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Eliminates Every Bug Known to Compilers 


_ As well as a few other species 


H.E.L.P. is a completely interactive 
C programming environment with three 
innovative full-sized features that will 
revolutionize the way you write code. 


A Clean Compile — 
Guaranteed! 


S ay Good-bye to all compiler-type 
errors. H.E.L.P. ’s built-in program 
checker (which would embarrass LINT) 
not only hunts down bugs . . . explains 
the proper syntax... gives examples of 
usage ... but will even offer suggested 
corrections. If you want, H.E.L.P. will 
even make the corrections for you... 
at the touch of a key. 


H.E.L.P. also finds semantic errors as 
well as poor style and inefficiencies. 
You can even check the portability of 
your code! 


Multi-Window Editing 


orn aS many windows as you want 

there’s no limitation ... not even 
your Own memory. Because H.E.L.P. 
uses a virtual memory system you can 
create programs larger than your 
machine capacity. 


H.E.L.P.’s very powerful editor allows 
you the flexibility to work in several 
windows . . . with several files at the 
same time. 


Circle no. 165 on reader service card 


Save Keystrokes 


I undreds of commands are bound 
to the keyboard to give you fast 
execution. 


Always be in Control 


N ot only can you develop code in 
many windows at the same time, but 
you can show (and refer to) important 
definitions in one window while creating 
in another. Or open a window and keep 
notes about your program...ortypea 
memo... ora letter. 


Increase your Productivity 
by 300% or More..... 


f you are a novice programmer, you'll 
begin writing code like an advanced 
programmer much faster with H.E.L.P. 


ust imagine what H.E.L.P. will do 
for the ADVANCED PROGRAMMER. 


ou’ll have more time to become 

creative with your algorithm (since 
H.E.L.P. will make sure your code 
compiles the “first time at bat”). 


H.E.L.P. tracks every step you make. 
If you are not sure about a command, 
just press a key, and you'll get the kind 
of help you need. 





Check These Features 


®@ Multi-window environ- @ /ntelligent help sub- 


ment system 

™ — prea! ® User-detinable key- 
checking oe 

© Check syntax, semantic, . a. : mi “ 
type usage, intermodule Uppors color an 
inconsistencies and monochrome 


@ H.E.L.P. supports the 
full C Language 


portability 
®@ Multi-file editing 


NOW IN MS-DOS 


eT Tm EXT La 


Everest Solutions, Inc. 
3350 Scott Boulevard 
Building 58 

Santa Clara, CA95051 
(408) 986-8977 





ptotech, Inc. The 5% inch 
Optical Disk Drive 
Is Here! 
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een software developers: 

No 
royalties 

on Btrieve. 


Effective January 1, SoftCraft will no longer charge royalties for our 
Btrieve file management system. 7 











By dropping royalties, we're giving software authors and application 
developers something to bank on: increased profitability on every copy of 
a Btrieve application that is used or sold. What you do with Btrieve is up 
to you. Whether you're developing applications for a handful of users or 
hundreds, you pay for Btrieve only once—no strings attached. The price 
remains the same. | 


With no royalties, doing business with SoftCraft is easier and more 
profitable than ever. We’re showing our appreciation to current Btrieve 
users, while furthering the rapid expansion of Btrieve applications. We 
believe this move will reinforce Btrieve’s position as the file management 
standard for IBM PC or AT software developers. 


SoftCraft is committed to providing our customers with the compre- 
hensive development tools they need. In the last 18 months alone we’ve 
introduced database query and report writing modules for Btrieve 
applications, as well as local area network and XENIX versions of Btrieve. 
Our Btrieve environment continues to grow, keeping you in the forefront 
as future trends emerge. 


We're convinced our new “no more royalties” plan will make you— 
and Btrieve—even more successful. 


And that’s a great way to start the new business year. 


Sc 





eae! rages 


SoftCraft Inc. 


P.O. Box 9802 #917 
Austin, Texas 78766 
(512) 346-8380 ‘Telex 358 200 


Suggested retail prices: Btrieve, $245; Btrieve/N (network version), $595; 
Xtrieve, $195; Xtrieve/N, $395; Rtrieve, $85; Rtrieve/N, $175. 
Requires PC-DOS, MS-DOS 1.X-3.X or XENIX. 

Btrieve is a registered trademark and Xtrieve and Rtrieve 
are trademarks of SoftCraft Inc. 
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Is it C or ts it 

assembly? 

WordStar on an 
Atari ST? > 


Mysterious and 
dangerous 


What C 

programmers 
don’t know can 
hurt them. > 


DDJ is now on p> 
CompuServe. 


Dr. Dobb's Journal, January 
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Our anniversary cover was 
designed by Shelley Rae 
Doeden, who also is respon- 
sible for the new look of the 
magazine. Shelley is DDJ’s 
Art Director. 





This Issue: | 
The Motorola 68000 chip is, 
some say, a programmer's 
processor. The instruction 
set is rich and logically con- 
structed, and memory access 
is simple and capacious. 
What it lacks, others say, are 
a standard operating system 
and development tools. This 
month we focus on pro- 
gramming tools for the 68K. 


Next Issue: 

Next month we'll look at 
structured programming 
and at some languages that 
have a reputation for en- 
couraging structured design. 
We'll publish programming 
tools in Pascal, Modula-2, 
and Ada. We'll tell you 
where to get public-domain 
Ada utilities to speed Ada 
software development, and 
we'll look at a program that 
ports between dialects of 
Pascal. 


3 


4 neu With Turbo ASYNCH, | 






touch with the world without ever leaving — 
nsit at its best. Turbo ASYNCH is designed — 
€ as ynchronous communication capabilities — 
al application programs, and it will drive. any 
ia the RS232 ports, like printers, plotters, 


5 Specs, Features include. . 





a . Initialization of the COM ports allowing | you 6 veel all transmis- 


sion options. @ Interrupt processing. @ Data transfer between cir- . | 
_ cular queues and communications ports. @ Simultaneous buffered oe oS 


: . input and output to both COM ports. @ Transmission speeds up. 
ete 9600 Baud. © / n put and ues TS as ee as — wish. 










It terrupt controller chips directly. These functions, installed as a 
oS runtime resident system, require just 3.2K bytes. The interface io. 
> oe assembler routines is written in Turbo Pascal. 








: 2 The Turbe Pasa | PERFORMANCE PACKAGE™ ™ jg al the serious 
Turbo Pascal p programmer who wants. quality tools to develop appli- 





pee. cations. é feny system co comes with a comprehensive User Reference . 






2 a IBM PC or compatible ‘iting MS-DOS version 2 0 or rater, 
- There. are no royalties for incorporating PERFORMANCE PACKAGE 
oe functions | mh ee eee 
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you can he in constant . © jis POWER TOOLS i isa 
Sleek new series of procedures — wo 
. designed specifically to complement Turbo Pascal on IBM and Cone 
: patible computers. Every component in Turbo POWERTOOLSis 
___ precision engineered to give you fluid and responsive handling, with — 
all the options you need packed into its clean Hines: a aes 


er computers. Turbo ASYNCH i is fast, accurate: = ance. and full instrumentation, including... 


| : | : . rs Extensive string handling to complement be cove Turbo ee 
_ Pascal functions. @ Screen support and window management, giv — 
_ ing you fast direct access to the screen without using BIOS calls: 


1 inh hicdon oe de ASYNCH a are spaetiby aiafied. > 


tee: . keyboard or clock. 
assembler for efficiency, and drive the UART and para : 


or even DOS, and create your own 
| ee applications. 



















@ Access to BIOS and DOS services, including DOS 3.0 and the 


IBM AT. @ Full program control by allowing you to execute any 


other program from within your Turbo Pascal application. ? Inter- : 


. rupt service routines written entirely i in Turbo Pascal. Assembly 


code is not required even to. service e hardware mee tke the. 









Using Turbo POWER TOOLS, you can now. “ti e | 









“habe Pascal isa ee of Borland 
International. Turbo POWER TOOLS. Turbo 
ASYNCH and PERFORMANCE PACKAGE are 
-___ fademarks of Blaise Computing : 18M is a registered 
trademark of internation NV Machines Corporation, 
eS _MS- DOS | veget eee ee 
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AT™ Pfantasies 


Want better speed and memory on your 
PC or XT without buying an AT? 

You've got it! 

Phoenix’s new Pfaster™286 co-processor 
board turns your PC or XT into a high- 
speed engine 60 percent faster than an 
AT. Three times faster than an XT. It even 
supports PCs with third-party hard disks. 
But that’s only the beginning. 

You can handle spreadsheets and programs 
you never thought possible. Set up RAM disks in 
both 8088 and 80286 memory for linkage editor 


overlays or super-high-speed disk caching. All with 


Pfaster286’s Imb of standard RAM, expandable to 
2mb, and dual-mode design. 


You can develop 8086/ 186/286 software on your XT | 
faster. Execute 95 percent of the application packages 


for your PC or XT." 


hardware-dependent programs and 

back again without rebooting. All with 
Pfaster286’s compatible ROM software. 
And, Pfaster286 does the job unintrusively! 
No motherboard to exchange. No wires to 
solder. No chips to pull. Just plug it into a 
standard card slot, and type the 

magic word, ““PFAST”’ 

If you really didn’t want an AT in the first. 
place, just what it could do for you, call or 
write: Phoenix Computer Products Corp., 
320 Norwood Park South, Norwood, MA 


02062; (800) 344-7200. In Massachusetts, 
617-762-5030. 


™ 


Programmers’ Pfantasies 
by 


that run on the AT, excluding those that require fancy I/O 
capabilities your PC or XT hardware just isn’t designed 
to handle. Queue multi-copy, multi-format print jobs for 
spooling. Or, switch to native 8088 mode to handle 


286 and Programmers’ Pfantasies are trademarks of Phoenix Computer Products Corporation. 


XT and AT are trademarks of International Business Machines Corporation. Pfaster 
d engine to symbolize how Pfaster can be added to your PC or XT to increase performance. 


For the Ferrari aficionado: yes. we know this is a rear engine car. We are showing the addition of a secon 
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= ate 1975 and 
early 1976 
@ saw anumber | 
lew magazines 
for a new group of 
_readers: the pioneer- 
ing users of the first 
microcomputers. 
Most were heavy on 
hardware because 
there was essentially 
no software to write 
about back then. In January 1976, a 
remedy for this situation appeared in 
the form of a magazine providing the 
tools needed to develop software: Dr. 
Dobb's Journal of Tiny BASIC Calis- 
thenics & Orthodontia. 

Ten years later, DDJ is still provid- 
ing software tools for serious pro- 
grammers. We've replaced ‘‘calis- 
thenics and orthodontia”’ with other 
metaphors and have moved upscale 
from a black-and-white newsletter to 
a four-color magazine, but we still 
publish the only pages in which you 
can find compilers, assemblers, and 
programming tools reviewed, de- 
signed, analyzed, and source-listed, 
with the whole process watched 
over by the most knowledgable read- 
ership in the industry. 

Was that last paragraph excessive- 
ly self-congratulatory? Pardon it, but 
there is occasion for it: This month is 
DDJ's tenth birthday. This birthday 
issue features articles on 68000 pro- 
gramming, leading off with Edward 
Ream's assembler that thinks it’s a 
compiler. In a more overtly festive 
act, this issue also unveils the new de- 
sign for DDJ. 

_The new design should more di- 
rectly indicate what the magazine 
provides: programming tools in the 
form of articles and listings, reviews, 
columns, a forum for discussion of 
programming issues, and services 
such as product listings. The title 
treatment, while harking back to the 
original cover design, makes it clear 
that what this magazine contains are 
software tools. Inside, we've gath- 
ered all the contents into five sec- 








tions: Articles, Re- 
views, Columns, Fo- 
rum, and Program- 
mers’ Services. 
Forum contains the 
editorial, letters, an 
editorial cartoon, 
and an invited view- 
point—this month 
by 68K authority Hal 
Hardenberg.  Pro- 
grammers Services 
will grow; this month it contains a 
section of information on the profes- 
sional side of programming. No room 
for reviews this month. 

We are fortunate to have some ex- 
cellent columnists who provide a 
personal view along with useful tips 


and utilities. Unfortunately, two of 
them are retiring from their colum-— 


nist duties: Dave Cortesi and Bob 
Blum. Bob is just too busy to keep up 
a monthly column and to do as good 
a job as he wants; he'll continue to 
contribute articles and to maintain 
his CP/M bulletin board. He has writ- 
ten a sign-off letter that appears on 
page 8. Dave is leaving computer 
writing for the writing of fiction. 
Both were longtime contributors and 
will be missed. We are actively, if 


grudgingly, seeking replacements. 


Perhaps you know a candidate? 
Finally, there’s the electronic com- 
ponent we've added to the maga- 
zine. By the time you read this, DDJ 
should be up on CompuServe. See 
page 17 for details. 


Wiclael See 


Michael Swaine 
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des 82 PC-DOS, MS-DOS, CP/M-86, Macintosh, Amiga, Apple II, CP/M-80, Radio Shack, 
Commodore, XENIX, ROM, and Cross Development systems 


Manx Aztec C86 


“A compiler that has many strengths ... quite valuable 
for serious work” 

Computer Language review, February 1985 
Great Code: Manx Aztec C86 generates fast executing 
compact code. The benchmark results below are from a 
study conducted by Manx. The Dhrystone benchmark 
(CACM 10/84 27:10 pl1018) measures performance for a 
systems software instruction mix. The results are with- 
out register variables. With register variables, Manx, 
Microsoft, and Mark Williams run proportionately faster, 
Lattice and Computer Innovations show no improve- 
ment. 


Execution Code Compile/ 
Time Size Link Time 


Dhrystone Benchmark 
Manx Aztec C86 3.3 34 secs 5,760 
Microsoft C 3.0 34 secs 7,146 
Optimized C86 2.20) 53secs 11,009 
Mark Williams 2.0 56secs 12,980 
Lattice 2.14 89secs 20,404 


93 secs 
119 secs 
172 secs 
113 secs 
117 secs 


Great Features: Manx Aztec C86 is bundled with a powerful 
array of well documented productivity tools, library routines 
and features. 

Optimized C compiler 
AS86 Macro Assembler 
80186/80286 Support 
8087/80287 Sensing Lib 
Extensive UNIX Library 
Large Memory Model 

Z (vi) Source Editor -c 
ROM Support Package-c INTEL HEX Utility -c 
Library Source Code -c Mixed memory models -c 
MAKE, DIFF, and GREP -c Source Debugger -c 

One year of updates -c CP/M-86 Library -c 


Symbolic Debugger 

LN8&6 Overlay Linker 
Librarian 

Profiler 

DOS, Screen, & Graphics Lib 
Intel Object Option 

CP/M-86 Library -c 


Manx offers two commercial development systems, 
Aztec C86-c and Aztec C86-d. Items marked -c are 
special features of the Aztec C86-c system. 


Aztec C86-c Commercial System $499 
Aztec C86-d Developer’s System $299 
Aztec C86-p Personal System $199 
Aztec C86-a Apprentice System $49 


All systems are upgradable by paying the difference 
in price plus $10. 


Third Party Software: There are a number of high qual- 
ity support packages for Manx Aztec C86 for screen 
management, graphics, database management, and soft- 
ware development. 


C-tree $395 
PHACT $250 
HALO $250 Amber Windows $59 
PRE-C $395 Windows for C $195 
WindScreen $149 FirsTime $295 
SunScreen $99 C Util Lib $185 
PANEL $295 Plink-86 $395 


Greenleaf $185 
PC-lint $98 
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Manx Aztec C68k 


“Library handling is very flexible ... documentation is 
excellent ... the shell a pleasure to work in... blows 
away the competition for pure conipile speed... an ex- 
cellent effort.” 

Computer Language review, April 1985 


Aztec C68k is the most widely used commercial C com- 
piler for the Macintosh. Its quality, performance, and 
completeness place Manx Aztec C68k in a position be- 
yond comparison. It is available in several upgradable 
versions. 
Optimized C 
Macro Assembler 
Overlay Linker 
Resource Compiler 
Debuggers 
Librarian 

Source Editor 
MacRam Disk -c 
Library Source -c 


Creates Clickable Applications 
Mouse Enhanced SHELL 
Easy Access to Mac Toolbox 
UNIX Library Functions 
Terminal Emulator (Source) 
Clear Detailed Documentation 
C-Stuff Library 

UniTools (vi,smake,diff,grep) -c 
One Year of Updates -c 


Items marked -c are available only in the Manx Aztec 
C86-c system. Other features are in both the Aztec C86-d 
and Aztec C86-c systems. 


Aztec C68k-c Commercial System $499 
Aztec C68d-d Developer’s System $299 
Aztec C68k-p Personal System $199 
C-tree database (source) $399 


AMIGA, CP/M-68k, 68k UNIX _ call 


Manx Aztec C65 


“The AZTEC C system is one of the finest software 
packages I have seen” 
NIBBLE review, July 1984 


A vast amount of business, consumer, and educational 
software is implemented in Manx Aztec C65. The quality 
and comprehensiveness of this system is competitive 
with 16 bit C systems. The system includes a full optim- 
ized C compiler, 6502 assembler, linkage editor, UNIX 
library, screen and graphics libraries, shell, and much 
more. The Apple II version runs under DOS 3.3, and 
ProDOS, Cross versions are available. 

The Aztec C65-c/128 Commodore system runs under 
the C128 CP/M environment and generates programs for 
the C64, C128, and CP/M environments. Call for prices 
and availability of Apprentice, Personal and Developer 
versions for the Commodore 64 and 128 machines. 


Aztec C65-c ProDOS & DOS 3.3. $399 
Aztec C65-d Apple DOS 3.3 $199 
Aztec C65-p Apple Personal system $99 
Aztec C65-a for learning C $49 
Aztec C65-c/128 C64, C128, CP/M $399 


Distribution of Manx Aztec C 


In the USA, Manx Software Systems is the sole and ex- 
clusive distributor of Aztec C. Any telephone or mail 
order sales other than through Manx are unauthorized. 
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Cross developed programs are edited, compiled, assem- 
bled, and linked on one machine (the HOST) and trans- 
ferred to another machine (the TARGET) for execution. 
This method is useful where the target machine is slower 
or more limited than the HOST, Manx cross compilers 
are used heavily to develop software for business, 
consumer, scientific, industrial, research, and education- 
al applications. | 


HOSTS: VAX UNIX ($3000), PDP-11 UNIX ($2000), MS- 
DOS ($750), CP/M ($750), MACINTOSH ($750), 
CP/M-68k ($750), XENIX ($750). 


TARGETS: MS-DOS, CP/M-86, Macintosh, CP/M-68k, 
CP/M-80, TRS-80 3 & 4, Apple II, Commodore C64, 
8086/80x86 ROM, 68xxx ROM, 8080/8085/Z80 ROM, 
65xx ROM. 

The first TARGET is included in the price of the HOST 
system. Additional TARGETS are $300 to $500 (non 
VAX) or $1000 (VAX). 

Call Manx for information on cross development to the 
68000, 65816, Amiga, C128, CP/M-68K, VRTX, and 
others. 


Manx Aztec CI 


“I’ve had a lot of experience with different C compilers, 
but the Aztec C80 Compiler and Professional Develop- 
ment System is the best I've seen.” 

80-Micro, December, 1984, John B. Harrell Ill 


Aztec C II-c (CP/M & ROM) $349 
Aztec C II-d (CP/M) $199 
C-tree database (source) $399 
Aztec C80-c (TRS-80 3 & 4) $299 
Aztec C80-d (TRS-80 3 & 4) $199 


How To Become an Aztec C User 


To become an Aztec C user‘call 1-800-221-0440 or call 
1-800-832-9273 (800-TEC WARE). In NJ or outside the 
USA call 201-530-7997. Orders can also be telexed to 
4995812. 

Payment can be by check, COD, American Express, 
VISA, Master Card, or Net 30 to qualified customers. 

Orders can also be mailed to Manx Software Systems, 
Box 55, Shrewsbury, NJ 07701. 


How To Get More Information 

To get more information on Manx Aztec C and related 
products, call 1-800-221-0440, or 201-530-7997, or write 
to Manx Software Systems. 


30 Day Guarantee 

Any Manx Aztec C development system can be return- 
ed within 30 days.for a refund if it fails to meet your 
needs. The only restrictions are that the original pur- 
chase must be directly from Manx, shipped within the 
USA, and the package must be in resalable condition. 
Returned items must be received by Manx within 30 
days. A small restocking fee may be required. 


Discounts 

There are special discounts available to professors, 
students, and consultants. A discount is also available on 
a “trade in” basis for users of competing systems. Call for 
information: 
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Blum Signs Off 

Dear DDJ, 

Being a part of DDJ for 
practically three years has 
been an incredible experi- 
ence. Even though I won't 
be writing a regular col- 
umn anymore, I don't feel 
that I am losing a thing. 
The many new friend- 
ships that I now enjoy and 
the experiences that I 
shared will last a lifetime. 

Of particular impor- 
tance to me has been your 
feedback. The many let- 
ters I received, even when 
critical, were a delight to 
read and helped guide me 
in preparing material 
meaningful to you. 

Even though I won't bea 
regular participant in fu- 
ture issues of DDJ, I have a 
number of CP/M projects 
under way that I hope will 
be accepted for publica- 
tion in the future. 

In closing for the last 
time, allow me to invite 
you to continue to visit my 
bulletin board system and 
to again thank each of you 
for looking in on the CP/M 
Exchange each month. 

Bob Blum 

5536 Colbert Trail 

Norcross, GA 30092 


Bob Blum’s RCP/M system 
is available for your use 24 
hours a day, 7 days a week. 
Reach it by dialing (404) 
449-6588. 


Dear DDJ, 

I have been searching 
(with no success) for the 
address and subscription 


cost for DTACK Grounded. 
Would you or any of your 
readers have this 
information? 

Thank you for your 
time. 

Calvin Dodge 

4490 Yukon Ct., #2A 

Wheatridge, CO 80033 


DTACK Grounded, one of 
the best newsletters on pro- 
gramming and the indus- 
try, ceased publication with 
Issue 45 to allow its editor, 
Hal Hardenberg, to devote 
more time to software de- 
velopment. His company, 
Digital Acoustics, is healthy 
and is mailing subscription 
refunds to subscribers. 
Back issues are still avail- 
able from Digital Acoustics, 
1415 E. McFadden, Ste. F, 
Santa Ana, CA 92705.—ed. 


Editors 

Dear DDJ, 

Mark Edwards is to be con- 
gratulated for his review 
of editors in the November 
1985 issue of Dr. Dobb’s. 
Anyone who ventures into 
this highly personalized 
field takes his life in his 
hands, and to attempt a 
survey of ten editors is 


chutzpah indeed. To do it 
with taste, relative com- 
pleteness, and fairness is 
no mean task. 

As Mr. Edwards notes, 
EC is in a high degree of 
flux, but I would note that 
my version (probably later 
than his, given the lead 
time it requires for an arti- 
cle) can do backward 
searching and does not 
suffer the poor error han- 
dling he referred to. An 
important aspect of any 
software is that of support, 
and I would just like to 
comment that I have 
found the authors of EC su- 
perlative in that aspect. 

A very nice feature of EC 
(among many others) is its 
maintenance of the DOS 
commands in a buffer. In 
all my editing I use APx 
Core, which offers multi- 
ple DOS partitions. EC did 
work with APxX but lost the 
ability to maintain the DOS 
command buffer under it. 
I called Gene Brown, the 
principal author of EC, 
and informed him of this 
and also gave him the ad- 
dress of APX. Much to my 
surprise and delight, I re- 
ceived three (count them, 





3) copies of the final ver- 
sion. One was the stan- 
dard, and the other two 
were potential solutions to 
the APX compatibility 
problem. They all worked, 
and the solutions did so 
beautifully. How many 
companies will give such a 
response? 

I have an additional 
comment with respect to 
the relevance of the com- 
patibility of editors with 
such ‘“‘enhancers’’ as Side- 
Kick. My experience has 
been that in the long run 
the side effects of these 
programs are less desir- 
able than their offerings. 
Even more to the point, 
though, XyWrite, BRIEF, 
and EC (and probably oth- 
ers in the review also) are 
sufficiently internally 
complete that you really 
do not need such en- 
hancers. BRIEF, with its 
powerful macro capabili- 
ty, allows you to create 
these enhancements for 
the most part, as does 
XyWrite for those it does 
not have; EC has most of 
them built-in, and the few 
it doesn’t, you can create. 
Communications are ac- 
cessible by any of these 
editors because you can 
exit to DOS, so you have the 
advantage of no overhead 
and no potential side ef- 
fects. With BRIEF, I even 
wrote a perpetual calen- 
dar to mimic that aspect of 
SideKick. 

Because people tend to 
use editors for short corre- 
spondence, a relatively im- 
portant aspect is their ‘‘re- 
formatting’ speed as most 
editors do not (understand- 
ably) maintain word wrap 
for text insertion after a 
line has been entered. One 
of the problems I found 
with EDIX was its intoler- 
ably slow reformatting—in 
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software tools affordable. 
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PC-DOS is a trademark of IBM 

MS is a trademark of Microsoh DEALER INQUIRIES WELCOME! 
Unix is a trademark of AT&T soe 

VAX/VMS is a trademark of Digital Equipment Corporation 













Wendin and XTC are Registered Trademarks of Wendin, inc. 
PCVMS, PCUNIX, and Operating System Toolbox are Trademarks of Wendin, Inc. 


PCUNIX™ only $4900 


PCUNIX™ is powerfull! It is a true multitasking, multiuser 
operating system similar to the popular UNIX® operating 
system from AT&T. This first release includes 30 utilities, 
designed to make your program development a snap. 

PCUNIX™ is versatile! It runs MS-DOS and PC-DOS 
programs, so that you’ll never have to buy another set of 
development tools! Simply use your existing compilers and 
linkers. You need nothing more! As with the development of 
all of our Operating Systems, Wendin has used the Wendin 
Operating System Toolbox™to construct PCUNIX™ Because 
of this, your programs will have access to the over 70 
enhanced system services found in the Wendin Operating 
System Toolbox! ™ 

PCUNIX™ is complete! Full source code to the shell and 
all utilities, written in “C”, is included with this incredible 
package. And if you would like the source to Wendin’s 
Personal Operating System Kernel, you may also want to 
purchase the Wendin Operating System Toolbox.™ 


PCVMS™ only *49°° 


PCVMS™ is Wendin’s version of the popular VAX/VMS 
operating system, which was developed by Digital 
Equipment Corporation for their line of VAX computers. 
PCVMS™ turns your IBM-PC, XT, AT, or true compatible | 
into a supercharged, multitasking, multiuser workstation 
that runs MS-DOS and PC-DOS programs. 

As with the development of all of our Operating Systems, 
Wendin has used the Operating System Toolbox™ to 
construct PCVMS, allowing your programs access to the 
over 70 enhanced system services available in the Toolbox. 

PCVMS™ comes with full source code to the PCVMS™ 
shell and its utilities, all written in “C”. If you also want the 
source to Wendin’s Personal Operating System Kernel, 
you may want to purchase the Wendin Operating System 
Toolbox.™ 





XTC©® =i onily $990°° 

XTC® is the world’s first multitasking editor for the IBM- 
PC. It also runs on IBM-XT and IBM-AT computers, as well 
as true compatibles. Designed BY programmers FOR 
programmers, XTC is the ultimate editing tool for software 
developers using C, PASCAL, ASSEMBLY, BASIC, 
FORTRAN, and other languages. 

Why is XTC® the ultimate tool for editing in your 
development environment? Because it has powerful 
features like MULTITASKING MACROS, WINDOWS, TEXT 
BUFFERS, UNDO N TIMES, MACRO PROGRAMMING 
CONTROL STRUCTURES and VARIABLES, as well as 
blinding speed that leaves other editors in the stone age. 


XTC® comes with full source code written in Microsoft 
Pascal, on 2 DSDD disks. 


Circle no. 112 on reader service card. 
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this respect VEDIT and EC 


are lightning fast, and 
BRIEF (with its free refor- 
mat macro) is only slightly 
faster than EDIX. XyWrite 
of course does it like any 


respectable word 
processor. 
I enjoyed’ reading 


‘Wired Tales” in Dave Cor- 
tesi’s column in the De- 
cember issue and offer the 
following. I recently decid- 
ed to upgrade my PC with 
a larger power supply (64 
watts to 135 watts) and, be- 
ing relatively frugal, or- 
dered one from a mail-or- 
der house for $89. When it 
arrived I (foolishly) started 
to install it: removed my 
old power supply, put the 
new one in, and started to 
make the connections. To 
my dismay, it turned out 
that the connectors were 
poorly constructed and I 
could not get a good fit. I 
decided to return the sup- 
ply for credit, not wanting 
to chance a repeat perfor- 
mance. It took me about 
$15 worth of phone calls to 
finally talk to someone 
who was authorized to is- 
sue an RA, and that same 
person informed me that 
there was a 10 percent re- 


stocking fee. Adding in the 
cost of the UPS shipment 
back, I wound up paying 
$30 for some futile labor in 
taking out and replacing 
my power supply, losing a 
nontrivial amount of time 
in the process. 

Finally, I offer a poser. I 
recently purchased an un- 
interruptible power sup- 
ply (300 watts) from Oubie. 
When it was delivered, I 
tested it in the usual way— 
I pulled the power plug— 
and it worked fine. Just to 
be doubly sure, I also 
opened the main circuit 
breaker in the house, and 
the same excellent perfor- 
mance repeated. A few 
days ago, we had our first 
real power outage while I 
was working at my PC, 
and much to my surprise, I 
lost all my work. When 
the power returned about 
one minute later, I imme- 
diately made the “pull the 
plug” test and it worked. I 
called Qubie’s technical 
department, and no one 
could offer a solution, but 
the company did offer to 
send me a replacement 
(which I accepted). In the 
meantime I have been 
thinking about the possi- 
ble causes of the loss of my 
work and believe I may 
understand why it hap- 


_Pmate brace counting macro program 





‘search fo 


_ jend loop 


—-sreturn to top of file 





sif none found, exit loop 
_ 3else increment count of braces 


_ ;begin loop 
_ ;$upress error messages 
__ ;8earch for closing braces 
_ 3if none found, exit loop 

;else decrement count of braces 
;end loop 
;go to buffer 2 
;put the result in buffer 2 


Table 1 
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pened, but I would love to 
hear from others. 
Morton F. Kaplon 
11 White Birch Dr. 
Pomona, NY 10970 


Dear DDJ, 

Although I greatly enjoyed 
Mark Edwards’ editor re- 
view (DDJ, November 
1985), I would like to make 
a correction or two and 
point out a problem with 
this kind of review. I think 
Mr. Edwards did a terrific 
job given the difficulty of 
trying to learn about ten 
text editors, much less try- 
ing to comment intelli- 
gently about them all. I use 
Pmate (Version 3.37) on a 
daily basis, however, and I 
am familiar enough with it 
to have caught a couple of 
errors in the review. 

The first (and smallest) is 
that Pmate does indeed al- 
low you to undo the dele- 
tion of a single character. 
What it will not allow is 
the retrieval of a character 
you have’ backspaced 
away. On a PC, this is the 
difference between the 
Delete key and the < 
(backspace) key. The dif- 
ference can be annoying, 
but it is frequently more 
helpful than not once you 
are aware that Pmate 
works in this way. 

A more serious error is in 
Mr. Edwards’ Pmate macro 
to count braces. The macro 
he presents does indeed 
work, but it is terribly 
slow. Trying it on a sample 
C program out of one of 
my working directories (on 
a Compag Plus), it ran for 
more than six minutes be- 
fore I aborted it—unfin- 
ished. There is a much bet- 
ter Pmate macro for brace 
counting, which I present 
in Table 1, page 10. This 
brace-counting macro fin- 
ished the same piece of 
code as above in less than 
six seconds (and is slowed 
slightly because it is con- 
structed to work with a file 


of any size as opposed to 
one entirely in memory). 
This is a huge difference 
from the results reported 
in the review. Because of 
differences in the test files, 
it is impossible to say 
whether this performance 
is better or worse than 
BRIEF or EMACS, but it is 
certainly of the same 
order. 

It is worth noting that 
the macro presented in Ta- 
ble 1 works in much the 
Same manner as the BRIEF 
and EMACS macros present- 
ed by Mr. Edwards. In par- 
ticular, it allows the editor 
itself to search for the char- 
acters to be counted rather 
than stepping through the 
file in a clumsy character- 
by-character fashion. I sus- 
pect that a properly rewrit- 
ten macro for VEDIT PLUS 
would show the same kind 
of dramatic speed im- 
provement. There might 
even be some hope for XTC 
if the proper macro formu- 
lation were used. 

This in turn points out a 
serious difficulty in bench- 
marking editors. A user 
who is familiar with an edi- 
tor will undoubtedly be 
able to generate a better 
benchmark than one who 
isn't. I would never have 
even considered writing a 
brace-counting program 
for Pmate in the way Mr. 
Edwards did. The way 
Pmate works guarantees 
that his macro is among the 
slowest possible for the 
task. 

Based on my experi- 
ence, I would tend to agree 
with Mr. Edwards’ com- 
ments about the functiona- 
lity and features of each 
editor he reviewed. Based 
on my findings for Pmate, 
though, I would be in- 
clined to disregard the en- 
tire benchmark table ex- 
cept for items A, B, F, and 
maybe C. 

Mr. Edwards has cer- 
tainly proved that it is im- 
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___ Now the biggest name 
in C compilers comes in a size 
everybody can afford. 


Let's C. 


Introducing Mark Williams’ $75 C compiler. Want to explore C programming for the first time? Or just 
on your own time? Now you can do it in a big way without spending that way. With Let’ C. 

This is no little beginner’ model. Let's C is a powerful programming tool, packed with all the 
essentials of the famous Mark Williams C Programming System. The one chosen by Intel, DEC, Wang 
and thousands of professional programmers. The one that wins the 


Mark Williams Let's C . , aa’ 

Te ean eE and benchmarks and the reviewers praise: 
MS-DOS “(This compiler) has the most professional feel of any package we tested...” —BYTE 

. cet atbibles plus “Of all the compilers reviewed, (it) would be my first choice for product 

e Full Kernighan & Ritchie C development.” —David W. Smith, PC WORLD 
and extensions And now for more big news. Get our revolutionary csd C Source 

e Full UNIX” compatibility ee for Rist 875 
ate eae Use this coupon or charge by calling toll-f Cee ar, er 

¢ Small memory model y calling toll-free: You can breeze throu 

CG Many powerful utilities 1-800-MWC-1700. In Ill. call 312-472-6659. d b : at th C gh 
emi hnner:.. A Ree yee . Cee ee ae Se tt 7 F Meee 5 Sree 
assembler, archiver, cc Mark Williams Let’s C level ignoring clunky 
one-step compiling, egrep, assembler code 


pr, tail, we 


$75 


—____ copies of Let's C and copies of csd (C Source Debugger ) 
at $75 each. (Ill. residents add 7% sales tax. ) 
[J] Check [-] Money Order [_] Visa, MasterCard or 

American Express 


| 
| 
| 
© MicroEMACS full screen | 
editor with source l 
¢ Supported by dozens of 
third party libraries | 
© Upgradeable to C | 
Programming System for | 
| 
| 
| 
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Please send me: 


Affordable, powerful, 
debuggable. Mark Williams 
Lets C is the big name C 
compiler at a price you can 
handle. Get your hands on 

















large scale applications Name 
development it now. 
Let's C Benchmark Done on Address 
an IBM-PC/XT, no 8087. 
Program: Floating Point CRY eat St Zip Mark 
from BYTE, August, 1983. Williams 
Exec Time in Seconds Card #——__________ Exp. Date Compan 
Let’s C 134.20 - pany 
Signature 


1430 West Wrightwood 
a Chicago, Illinois 60614 
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possible for a single person 


to learn enough about ten 
different editors to be able 
to compare each at its best. 

Brad Chase 

P.O. Box 705 

Exeter, NH 03883 


Modula-2 

Dear DDJ, 

While perusing your oth- 
erwise excellent Novem- 
ber issue, I felt a sudden 
stab of pain. Looking clos- 
er, I saw the source of my 
discomfort was “‘Bit Ma- 
nipulation in Modula-2.” I 
feel an overwhelming 
need to comment. 

“I knew from the outset 
that it was impossible to 
match C’s simplicity.”’ This 
tells me that the author is 
primarily a C hacker. Mo- 
dula-2 is perfectly capable 
of matching this “simplic- 
ity,’ and in exactly the 
same manner. (See Table 2, 
below.) | 

The other operations are 
left as exercises for the 
reader. 

Lawrence C. Smith 

51 Lake St. 

Nashua, NH 03060 


C Compilers 

Dear DDJ, 

I love Dr. Dobb’s and have 
subscribed for years. I no- 
tice a trend away from as- 
sembly, CP/M, 8-bit, and 
the less wealthy user, 
though. In particular, your 
issue on C language was a 


(“ assume ch: =CHAR(255) *) 
(* clear bit 7 *); 

ch: = CHAR(BOOLEAN(ch) & BOOLEAN(07Fh)): 
(* result is ch=CHAR(127) *) 


(* assume ch: =CHAR(15) *) 
(set bit 5 7) 


disappointment. The fol- 
lowing are my reasons, 
along with some sugges- 
tions. I understand your 
problems in appealing to a 
divergent group, howev- 
er, and appreciate your 
willingness to listen to all 
our suggestions. 

1. The main article on C 
comparisons told me more 
than I really cared to 
know about the languages. 
I would have trusted the 
writers if they had sum- 
marized their results. An 
article this long and de- 
tailed should have a sum- 
mary at the beginning. 

2. The article did not 
state which of the lan- 
guages examined were 
available on either S-100 
machines, on CP/M, or on 
8-bit machines. 

3. I did not see mention 
of several of the Cs I use— 
BDS C, Small-C, or Tiny C or 
any mention of Lifeline’s 
products—and that would 
have been important to 
me. I am sure other Cs 
could have been found as 
well—so how much long- 
er would it have taken to 
wait a bit and doa truly de- 
finitive review? 

Frederic Schlamp 

2205 Meadowview Rad. 

Sacramento, CA 95832 


The comparative review of 
C compilers in our August 
1985 issue was strictly dedi- 
cated to MS DOS-compatible 
compilers. We will review 
C compilers for other envi- 
ronments, including CP/M, 


(* clearing bits *) 


(* setting bits *) 


ch: = CHAR(BOOLEAN(ch) OR BOOLEAN(10H)): 


(* result is ch=CHAR(63) *) 


Table 2 
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in 1986.—ed. 


Columns 

Dear DDJ, 

In your July 1985 issue the 
16-Bit Software Toolbox 
column began with the 
line ‘One of the most nov- 
el features added in Ver- 
sion 2 of MS DOS is the con- 
cept of ‘installable device 
drivers.’ ’’ I would like to 
say that this concept may 
be new and novel for Mi- 
crosoft and MS DOS, but it is 
certainly not a new and 
novel concept for other 
operating systems avail- 
able for microprocessors. 

The OS-9 operating sys- 
tem has had the concept of 
user-installable device 
drivers since its initial 6809 
Level 1 release in 1978. In 
fact, OS-9 is totally modu- 
lar in nature and allows 
the user to add new device 
descriptors, device driv- 
ers, and new file managers 
if required. In addition to 
supporting installable 
drivers, OS-9 has included 
the “novel” MS DOS con- 
cepts of hierarchical direc- 
tor structures and pipes. 
OS-9 also gives full support 
to I/O redirection, multi- 
processing, and multitask- 
ing—concepts much more 
akin to Unix. 

OS-9 may not be as well 
known as MS DOs is, but it 
does have a large and rap- 
idly growing following in 
the 6809 and 68XXX world 
today. MS DOS has added 
nothing novel to its OS; it is 
adding features that are 
expected and required for 
an OS in today’s world. 
These features have been 
around in OS-9 and OS-9/ 
68000 for some time. 

Tim Harris 

Microware Systems 

Corp. 
1866 N.W. 114th St. 
Des Moines, IA 50322 


Dear DDJ, 
“It isn’t what you don’t 
know that hurts you, it’s 


what you know that ain't 
so.’ In the September Of 
Interest column, the au- 
thor states that APL on the 
IBM PC requires an 8087. 
This is only true for IBM’s 
own APL, not for the other 
five (STSC, Sharp, Portable 
Software, Watcom, and 
NIAL Systems). Most of 
them run on the PCjr. 

Edward M. Cherlin 

6611 Linville Dr. 

Weed, CA 96094 


Dear DDJ, 

I was interested to read the 
portion of your Dr. Dobb's 
Clinic (October 1985) re- 
garding the intricasies of 
manipulating path names. 
Some time ago, we at POLY- 
TRON also had the pleasure 
of figuring out how to do 
exactly what you dis- 
cussed. Our = solution, 
which produced some 
functions that are more 
general purpose, might in- 
terest your readers. The 
primary components of 
our solution are: 


1. A function to deter- 
mine if a given path name 
represents a directory— 
that is, it is a drive ID or an 
actual director but not a 
normal file: 


int is_dir(name) 
char *name; 


2. A function to deter- 
mine if a given file name 
contains wildcard charac- 
ters: 


int is_wild(name) 
char *name; 


3. A general-purpose 
function for generating a 
new file name given an ex- 
isting file name, an option- 
al new extension, and an 
optional new path: 


char * 
bld_fnam(pathp, 
namep, extp) 

char *pathp; 
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Turbo, who? 


Do you have to give up power and advanced potential 
to get ease of use and affordability? Not anymore. 
Because now, you can have UCSD Pascal for only $79.95! 
















lf you're making your move into 
programming, there’s no better way 
to go than Pascal. And starting now, 
you dont have to settle for 
a stripped-down 
version of Pascal 
in order to get a price 
that’s right. Instead, 
you can choose UCSD Pascal—the 
recognized Pascal programming 
standard in colleges and uni- 
versities throughout the 
country — at the incredibly 
low introductory price 
of $79.95 for your 
PC-DOS, MS-DOS, or 
other popular computer. 


Start with the standard 


With an entry-level system, 
you spend a lot of valuable 
time learning a non-standard 
form of Pascal. And you 
don't get all the capabilities a true 
Pascal system is supposed to 
deliver—unless you buy a lot of 
add-on utilities—which can send 
the cost of your system sky-high! 


Programming that’s easy 
...and fun! 
At Pecan Software Systems, we 
’ strongly believe programming 
~ Should be as easy as possible. 
: =! UCSD Pascal was originally designed 
“— o>, for teaching programming 
. 3 Skills, so its extremely 
easy to learn and to use. 
With UCSD Pascal, you'll 
be developing programs right 
from the start that are 
easy to write, easy to 
understand, and easy to 
maintain. We also believe 
that programming should 
be fun. So we've made UCSD Pascal 
as enjoyable to use as it is powerful. 


The right tool at the 
right price 

When the fun gets serious, you'll 
have a comprehensive programming 
system right at your fingertips with 
UCSD Pascal—a system that will 
help you develop those big-league 
programs you may eventually want 
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Turbo Pascal is 2 
registered trademark 
of Borland international 





DD 


Circle no. 200 on reader service card. 


LETTERS 
(Continued from page 12) 


/* the new path */ 
char *namep; 
/* the original name */ 
char *extp; 
/* the new extension */ 


This returns a pointer to 
allocated memory contain- 
ing the newly constructed 
file name. The original 
name may or may not 
have a path or extension. If 
either pathp or extp point 
to a null string, the respec- 
tive component of the 
original name is omitted 
from the new name. If ei- 
ther pathp or extp is a null 
pointer, the respective 
component of the original 
is used in the new name. 
4. A wildcard file name 
expansion function with 
optional ability to prepend 
the path of the wildcard 
name to each matching 
name is shown in Table 3 
(below). This returns a 
pointer to a linked list of 
names matching the wild- 
card name. Each node of 
the list is contained in sep- 


arately allocated memory 
and is of sufficient length 
to contain the matching 
name beginning at 
name[0). 

5. Functions to extract 
each of the three compo- 
nents of a file name—the 
path, the root, and the ex- 
tension are shown in Ta- 
ble 4 (below). These func- 
tions each return a pointer 
to allocated memory con- 
taining the respective 
component of a file name. 

Using these functions, 
you can do just about any- 
thing you wish with file 
names. In fact, they are 
used in nearly all our 
products and continue to 
be used in new develop- 
ment work. 

These functions, along 
with a host of others, are 
available in the POLYTRON 
C Library 1. This package 
contains routines that 
function under DOS 1.x, 
DOS 2.x and later, and 
both/either. The functions 
are provided in linkable 
form (libraries), as well as 
in full source form (C and 
assembler) for the IBM PC/ 


I acca se a linked list at mate ing r 
| Struct file_list . 
{ 


char ene 


Table 3 


“char * - 
path_of(name) 


siract file_list * *next: 7° or to next t node * ae 
a a oe name < 


struct file_ ist * - oo a a 


A dname should be 





_ the name from which to extract the path */ 


as , ‘the name >from which to extract the root ‘/ 


bieg Tne : 
char *name; — 


Table 4 
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/* the name from which to extract the 
extension */ 





XT/AT and compatibles. 
Donald K. Kinzer 
POLYTRON Corp. 

P.O. Box 787 
Hillsboro, OR 97123 


Dear DDJ, 
Here is a report on a soft- 
ware company for the ben- 
efit of prospective buyers. I 
purchased a cross-assem- 
bler from 2500AD in No- 
vember 1984. What they 
sent me was a nonfunc- 
tioning program. Soon af- 
ter receiving the program, 
Isent two letters, made two 
phone calls, and finally 
spoke to someone who said 
the company would send 
me a good copy when it 
had fixed the program. It 
has been a year, the firm 
still has my $200, and I 
have not yet received a 
functional copy of the pro- 
gram. Even JRT Pascal was 
functional, and look at the 
price difference! 

For the record, here are 
the defects that I have 
found (so far): 


1. The assembler and the 
linker are incompatible. 
The linker makes the 


| wrong assumptions about 


the relative order of least / 
most significant bytes, 
which makes it impossible 
to link object modules. The 
only way to get an execut- 
able file is to put all your 
code into one module and 
use absolute addressing 
(with an ORG statement). 

2. The assembler gives 
the wrong machine code 
for several of the opcodes. 
This makes for difficult 
debugging. 

3. Some of the pseudo- 
ops listed in the manual 
don't exist in the actual 
assembler. 

4. Some of the pseudo- 
ops that do exist do not 
work (at least one). 

5. The assembler has no 
provision for allowing the 
programmer to specify the 
short forms of the relative 


jump and call instructions. 

6. The symbol table that 
is printed at the end of the 
listing usually contains sec- 
tions of garbled mess. 

7. The printed symbol 
table lists all intermediate 
values of labels that are re- 
defined many times with 
the DEFL statement. 

8. Some errors in the 
source code cause the as- 
sembler to crash with no 
error message. 

9. The linker crashes 
with a nonsense error 
message under some con- 
ditions that seem to have 
something to do with cer- 
tain exact lengths of files. 

Neil R. Koozer 

Kellogg Star Rt. 

Box 125 

Oakland, OR 97462 


In the September issue, we 
ran a comparative review 
of PC TEX and MicroTEx. 
At that time only PC TEX in- 
cluded INITEX, but we stat- 
ed that MicroTEX was also 
scheduled to include INITEX 
in an August update. As of 
the time this issue went to 
press, MicroTExX still does 
not include full INITEX ca- 
pabilities. We have been in- 
formed by Addison-Wes- 
ley that a new version of 
MicroTExX, including INI- 
TEX, will not be available 
until January 1, 1986. Check 
with Addison-Wesley be- 
fore placing an order. Both 
Addison-Wesley and Per- 
sonal TEX are already dis- 
tributing the Textset laser 
printer and screen preview 
driver.—ed. 


DDJ 
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FORUM 


VIEWPOINT 


Inefficient C 


This column is adapted 
from DTACK Grounded, 
The Journal of Simple 
68000/32801 Systems, Issue 
42. 


[' has been apparent to 
me for two or three 
_ years now that complex 
_ programs (as opposed to 
the famous but simplistic 
“hello world” type) writ- 
ten in C consistently run a 
great deal slower than the 
Same complex programs 
written in assembly. Ex- 
amples of this rule can 
readily be found in the 
personal computer mass 
marketplace. 

It is true that, in the last 
year or two, many intelli- 
gent and experienced pro- 
grammers have asserted 
that C has little or no high- 
level language (HLL) 
overhead. 

There is an apparent 
conflict here. 

Consider the complex 
problem of writing a BASIC 
interpreter. You can break 
this problem down into a 
large number of simple 
problems that can then be 
solved in assembly or, say, 
C. The speed with which 
each of the simple prob- 
lems can be solved de- 
pends on how good a 
match can be made be- 
tween the problem and 
the available control con- 
structs, data types, and so 
on. In some cases the 
match with the constructs 
and data types available in 





by Hal Hardenberg 





C is as good as the best that 
can be devised using as- 
sembly, and you have zero 
HLL overhead. In fact, 
many simple problems can 
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be solved as quickly (or 
nearly so) in C as in 
assembly. 

So, the C supporters 
have no shortage of real- 
world examples of simple 
problems that can be 
solved as quickly (or nearly 
so) in C as in assembly, 
which leads them to claim 
that C has no high-level 
overhead. 

Some problems, though, 
can be solved easily and 
quickly in assembly and 
are real bears in C, given 
the restricted range of op- 
erations, constructs, and 
data types available to C 
programmers. The large 
number of simple prob- 
lems that comprise a BASIC 
interpreter will include 
some C-easy problems, 
some C-not-so-easy prob- 
lems, and some C-bears. 
Therefore, any full-func- 
tion BASIC interpreter writ- 
ten in C will always be a 
great deal slower than the 
same interpreter written 
in assembly. 

You need not look for 
complex ways to analyze 
the HLL overhead of C (or 
any high-level language). 
The fact is, all high-level 
languages greatly restrict 
the range of operations, 
control constructs, and 
data types available, com- 
pared to assembly lan- 
guage. Thus, HLL program- 
mers have a_ limited 
number of tools available 
for solving the large num- 
ber of simple problems 
that comprise any solvable 
complex problem. 

Obviously, the program- 
mer with the most com- 
plete set of tools can al- 
ways produce the fastest 
code. Real-world evidence 
such as Microsoft’s MBASIC 
(written in assembly) vs. 
DRI’s Personal BASIC (writ- 
ten in C) confirms this rule. 


Why, then, do intelligent, 
experienced programmers 
claim that C has little or no 
HLL overhead when abun- 
dant real-world evidence 
contradicts such = an 
assertion? 

Well, suppose you have 
solved a complex problem 
using C. Then, keeping the 
90-10 rule in mind, you go 
looking for ways to speed 
up the software. Do you re- 
write the program from 
scratch in assembly, using 
the greater variety of avail- 
able operations, data struc- 
tures, and control con- 
structs? No, you continue 
to use the data structures 
and algorithms that you 
developed in C. That is, 
you implicitly restrict 
yourself to the smaller 
toolkit that is already used 
by C! Not surprisingly, the 
resultant program is not 
much faster than the origi- 
nal. Hence you announce, 
“Hey, guys, I tried optimiz- 
ing the problem using as- 
sembly and got little or no 
improvement over the 
original C. Obviously C has 
little or no _ high-level 
overhead.” 

Obviously. 

HLL inefficiency is ac- 
ceptable in many environ- 
ments. Where HLL ineffi- 
ciency is not acceptable is 
in the personal computer 
mass marketplace wherev- 
er an efficient alternative 
is available. DRI’s Personal 
BASIC is essentially a dead 
issue, being highly uncom- 
petitive with Microsoft’s 
assembly-based BASICs in 
terms of speed. In turn, the 
marketplace is widely 
avoiding Microsoft’s C- 
written FORTRAN 
compiler. 

The individuals who 
make up the mass market- 
place and who vote with 
their wallets don’t care 


how hard it was to produce 
a program or how long it 
took. They don't care about 
source documentation or 
maintainability because 
they never get to see the 
source documentation and 
somebody else maintains 
the code. They vote for 
those programs that work 
both swiftly and well (Lo- 
tus 1-2-3, original WordStar, 
MBASIC, or GW-BASIC) rath- 
er than those that run well 
but slowly (Context MBA, 
WordStar 2000, or DRI Per- 
sonal BASIC). 

The folks who assert that 
C has little or no HLL over- 
head are either talking 
about simple problems for 
which C is in fact well suit- 
ed, or they are observing 
that, if algorithms written 
in C are duplicated in as- 
sembly, then the assembly 
versions have little advan- 
tage. To reason that C 
therefore has little HLL 
overhead is faulty logic. 

Other things being equal, 
the more complete toolbox 
is always going to win pro- 
vided the workman knows 
how to use those tools. 
That’s why good, experi- 
enced assembly program- 
mers cost more than HLL 
coders. 


DDJ 
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FORUM 


DDJ ONLINE 


DDJ Goes 
Online 


On January 1, 1986, the 


Electronic Edition of Dr. 
Dobb’s Journal will appear 
on CompuServe. Through 
the Electronic Edition DDJ 
will offer the following: 


¢ We will make available in 
our data libraries all the 
listings that appear in the 
articles and columns of Dr. 
Dobb’s Journal’ every 
month. We will also offer 
selections from some of 
our more popular back is- 
sues and run articles and 
listings that have not ap- 
peared in the magazine. 

eWe will maintain a dis- 
play area where Compu- 
Serve users can read ab- 








stracts of the material in 
the current issue. The dis- 
play area will also contain 
general magazine informa- 
tion, such as our editorial 
calendar, writers’ guide- 
lines, and information 
about advertising rates. 
¢We will compile compre- 
hensive lists of the com- 
mercial software develop- 
ment tools available to 
microcomputer program- 
mers and feature compara- 
tive reviews of products in 
selected categories. We will 
also compile selected bibli- 
ographies and give capsule 
reviews of newly released 
books. 

¢ We will provide a messag- 
ing facility with columnists 
and other SIG members. 
¢We will stage regular on- 


line teleconferences with 
authors, columnists, and 
other distinguished guests. 
¢We will take subscrip- 
tions for Dr. Dobb’s Jour- 
nal, the magazine. We will 
also provide a way for 
readers to register circula- 
tion complaints. 

«We will provide com- 
plete information about 
other DDJ publications, 
such as back issues, bound 
volumes, indexes, Dr. 
Dobb’s Books, and Dr. 
Dobb’s Software. We will 
also take orders for these 
items. 


Please watch this de- 
partment for further an- 
nouncements about con- 
ference schedules or the 
availability of listings from 


C¢ TM 
aL RE BE has redefined my relationship with my hard drive.” 


Why XTREE is the New Standard For File and Directory Management. 


TREE simplifies file and directory handling by 


providing single keystroke commands to access, delete, 





rename, view, move, list or show all files within any and = 
_alldirectories. XTREE displays a graphic picture of your fet 
directory organization, instantly shows all the files in Ga, 
each directory or all files across all directories! Just Carer 
point with the arrow keys (full scrolling and paging in all rR A 
windows) and press a key. Your menu is clearly dis- Panu 


played at all times. 





. NOT copy-protected. 


on —® W MY Ke 


(holds up to 5 disks). 


10 Reasons To Buy XTREE 


. Shows ALL files or groups of files in ALL directories in one sorted display. 


. Copy, delete or rename multiple files in different directories in ONE operation. 
. Automatically copies groups of files across several diskettes. 


. Demo available for only $5.00 includes reusable diskette case 


6. “I finally found a package that I use routinely to clean up my disks. | 
recommend it highly. It’s a steal at $49.95.” 


— John Dvorak, Infoworld 


7. “All XTREE operations execute very quickly. XTREE is a great utility for 
getting an overall feel of your hard disk. And, if you feel the need to totally 
reorganize your hard disk, XTREE is unparalleled.” 








— Garry Ray, PC Week 





DIR Available Delete F 
COMMANDS Tag Untag Volume ~ 
tL select directory RETURN file commands 









back issues. Also, if you 
have a request for a listing 
from a back issue, drop us 
a note cr just leave a mes- 
sage in the DDJ Electronic 
Edition on CompuServe. If 
we get enough requests 
for a specific listing, we 
will try to make it avail- 
able. 

Some of these services 
may not be available Janu- 
ary 1. Most will be free, 
but some will involve a 
small charge. 

You access the DDJ Elec- 
tronic Edition by typing go 
DDJ at any CompuServe 
system prompt. We hope 
you will drop by and have 
a look. See you soon! 


DDJ 





—PC MAGAZINE 


DISK: B: XTREE(C)ESI 
Available 
Bytes: 258, 888 


DI&K Statistics 
Total 
Files: 
Bytes: 
Matching 
Files: 
Bytes: él, 


agged 
Files: 


61, 


oo &x &8 





eae D 
rrent Directory 
1965 i 





Files: 


iles Log disk Makedir Rename Show all files 
Tag “Untag 


Fi quit F2 help 


8. “If the program were not already subtitled The new standard for file and 
directory management, | would have described this wonderful new utility the 


exact same way.” 


9. Only $49.95 plus $2 shipping. 








— Phil Wiswell, PC Magazine 





10. To Order call 800-634-5545 In CA (818) 990-3457 
or send check or money order to: 


EXECUTIVE SYSTEMS, INC. 


15300 Ventura Blvd., Suite 305, Sherman Oaks, CA 91403 
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COLUMNS 


CC CHET 


A Unix-like Shell for MS DOS 


| Pee month we presented a few 
support routines, part of a Unix- 
like shell for MS DOS. This month 
we re going to continue with the shell 
itself, describing how it works on a 
high level. Next month we'll look at it 
at a lower, functional level. The code 
itself, because it’s so long, will be 
spread over the next three months. 

The shell described here includes 
functions of the Unix C shell that I 
use most often, such as aliases, his- 
tory, and command-line wildcard 
expansion (more on all this in a mo- 
ment). It has batch-file capability and 
will permit nested batch-file execu- 
tion (unlike MS DOS, which lets you 
chain from one batch file to another 
but won't let you return to the origi- 
nal batch file). 

It supports a 2,048-byte command 
line with interactive editing. The 
long command line is passed to an ex- 
ecuted program through an environ- 
ment variable. 


Using the Shell 

Commands are entered from the 
command line, just as in DOS. (Note 
that \ is a special character to the 
shell, so use slash (/) or \ \ to separate 
directory names.) DOS wildcard char- 
acters (* and ?) are expanded before a 
command is executed. So if you say 
echo *.c, the *.c will be expanded to 
_ the names of all files having a .c ex- 
tension before echo is invoked. Ex- 
panded names are sorted. Several 
semicolon-delimited commands may 
be executed from a single command 
line. For example: 


cd foo ; pwd ; Is 





by Allen Holub 





changes the current directory to foo, 
prints the full path name, and then 


prints a list of the files in the current 
directory. 


Command-line editing (as de- 
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scribed last month) is supported. To 
summarize: 


Cursors—moves the cursor. 

Home—gets to the beginning of the 

line. 

End—gets to the end of the line. 

Ctrl-right arrow and Ctrl-left ar- 
row—get to the next and the pre- 
vious word, respectively. 

*“H—is a destructive backspace. 

Del—deletes the character under the 
cursor. (Typed characters will be 
inserted at the current cursor lo- 
cation, moving all characters to 
the left of the cursor over one 
notch.) 

*x—deletes the entire line. 

Esc—does the same and aborts. 

Return—causes the commands to be 
executed. 


There are several built-in com- 
mands: 


alias—creates, modifies, or prints 
aliases (see below). There are two 
syntaxes: 


alias 
alias name <val> 


The first prints all currently de- 
fined aliases, and the second cre- 
ates an alias for name with the in- 
dicated value. <Val> may be 
anything on the command line, 
but you have to escape (precede 
with a \) any character that’s spe- 
cial to the shell (or surround 
<val> with double quotes). 

cd—changes a directory or disk: 
cd foo—changes to the subdirec- 
tory foo. 





cd..—changes to the parent 
directory. 

cd a:—changes to the current di- 
rectory on the a: drive. 

cd a:/foo—changes to the /foo di- 
rectory on the a: drive. 

Cd must be used to change disks, 
although you can alias a: to cd a: if 
you like. The shell checks to see if a 
disk is in the indicated drive before 
the drive is logged on. 

exit—terminates the shell. Either exit 
or logout must be used to leave the 
outermost shell. Subshells can be 
terminated with a °C. 


history—prints the history list (see 
below). 

logout—like exit, terminates the 
shell; however, the file /logout- 
.bat is executed before exiting. 

pwd—prints out the current work- 
ing directory (same as chdir with 
no arguments under DOS). 

rem—does nothing. May take argu- 
ments (which will be ignored). 
This command is here only for DOS 
compatibility. The preferable 
method for commenting a batch 
file is to start comment lines with a 
# in the far left column. Note that 
rem is interpreted as if it were a 
command; that is, the line is put 
into the history list. Moreover, if a 
line starts with a rem but has a 
semicolon on it as well, text up to 
the semicolon will be ignored but 
the semicolon will be treated nor- 
mally, and any text following the 
semicolon will be treated as a sec- 
ond command and executed. 

set—creates, modifies, or prints a 
shell variable (see below). Its syn- 
tax is: 


set 
set name [=] [value] 


The first form prints all current 
shell variables, and the second 
creates or modifies an existing 
variable. Both the equals sign and 
the value fields are optional. If 


Dr. Dobb’s Journal, January 1986 





you omit the value, the alias will 

expand to a null string. 
setenv—changes or creates an envi- 

ronment variable. Its syntax is: 


setenv name [=] [value] 


Both the equals sign and the value 
field are optional. An example: 


setenv PROMPT $p> 


sets the prompt to the current di- 
rectory name followed by >. This 
command is very similar to the 
DOS set command. However, 
setenv with no arguments doesn't 
print the environment. Also, the 
equals sign is optional. 

shift—shifts all the $<num> argu- 
ments in a batch file left one 
notch. For example, if a batch file 
(foo.bat) consisting of: 


echo $0 $1 $2 
shift 
echo $0 $1 $2 
shift 
echo $0 $1 $2 


is executed with the line: 
foo first second 


the following output will be sent 
to the screen: 


echo first second 
first second 
second 


($0 expands to the file name.) 
unalias—removes an alias. The syn- 
tax is unalias name. 
unset—removes a shell variable. The 
syntax is unset name. The default 
variables (verbose, echo, arg) can't 
be removed. 


History 

The history functions let you exam- 
ine, edit, and reexecute previous 
commands. The 32 most recently 
typed commands are remembered 
in a history list, and each command 
has a history number associated with 
it. Once the history list is full, the old- 
est command is discarded every time 
a new command is added to the list. 
The easiest way to see how this 
mechanism works is with an exam- 
ple. Assume that you've typed the 
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following five commands: 


vi prog.c 

cc —C prog.c >err 

vi another.c 

cc —c another.c >err 

link another + prog,prog,prog,c. 
lib+ /lib/tools.lib 


As you type the commands, they're 
entered into the history list, which 
can be examined by typing history. 
The following will be printed: 


1: vi prog.c 


C PROGRAMMERS, 
CALL A 
POWER PLAY 
WITH... 


Nw Ai ; 
Cu 


— 


I 
ay Be 
6. 


..db_ VISTA 
MANAGEMENT SYSTEM FOR C. 


db__ VISTA is a full-featured program- 
mer’s DBMS. It handles your data power- 
fully, yet economically without the frills 
that make end-user DBMS’s bulky, slow 
and expensive to license. Use only the 
features you need for maximum 
efficiency with minimum code and 
effort. 


Powerful lineup of features. B-tree 
indexing, multiple key records, trans- 
action processing, interactive database 
access utility, and file transfer utilities 
for dBASE, R:base and ASCII files. You 
even get 90 days applications develop- 
ment support free of charge. 


Define your playbook up front. As a net- 
work model DBMS, db__ VISTA is suited 
to applications development. A premium 
is placed on efficient use of disk 
storage, reduced data redundancy and 
fast access times allowing you to cross 
the goal line first. 


it’s your game plan. The database struc- 
ture is specified by you in db__VISTA’s 
data definition language (DDL). The DDL 
processor compiles the specification 
into tables (data dictionary) used by 
db__VISTA’s library functions, which are 
called by your C program to manipulate 
and access the database. 





2: CC —C prog.c > err 

3: vi another.c 

4: cc —c another.c >err 

5: link another + prog,,,c.lib+ /lib/ 
tools.lib 

6: history 


Note that history itself is also added 
to the history list. The numbers are 
the history numbers associated with 
each command. A command can be 
executed again by typing !%, where # 
is the history number. Typing !5 
causes the link command to be exe- 
cuted again. !2 will reexecute the first 















ROYALTY FREE... 
SOURCE CODE... 
PORTABILITY. 





DATABASE 


db__VISTA’s written in C so you can 
understand the signals. Source code Is 
optional. No sweat. No royalties, either. 


All this delivered for less than the price 
of season tickets. 


Single user without source ...... $195 
Single userwithsource ......... $495 
Multi-user withoutsource ....... $495 
Multi-userwithsource.......... $990 


Available for most popular C compilers 
under MS-DOS, XENIX, plus most 
UNIX systems. 


Go for the power play and order 
db__VISTA now. Call (206) 747-5570 or 


1-800-843-3313 


at the tone touch 700-992. 30 day money- 
back guarantee. 


WN RAIMA 


CORPORATION 







12201 S.E. Tenth Street 
Bellevue, WA 98005 USA 
Telex: 9103330300 
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(Continued from page 19) 


cc command. You can also type 
!<pat>. In this case, the history list 
will be searched backward for a 
command starting with <pat>. So !I 
or !link would also redo the link. !cc 
would be the same as /4 (because the 
first matching command is used). !! 
will repeat the last command you 
typed. In the above example, !!, /6, 
and /h will all do the same thing. 
Commands are added to the history 
list every time they're executed, 


even if a command is an expansion 
of a history request. 

Several additional non-Unix his- 
tory commands are supported. 
!>file will write the current history 
list to the specified file. If no file is 
given, /histlist is used. The comple- 
mentary command is !<file, which 
adds the commands in file to the cur- 
rent history list. The commands 
aren't executed, they're just added to 
the list. Again, if file isn’t specified, 
/histlist is used. Neither !> nor !< 
will show up in the history list (they 
won't use up a history number, 


HOLIDAY GIFTPACK SPECIAL 


* && FREE HOLIDAY GIFT «** 


When you buy FLASH, you get FREE, one 
of Ve noe ROOM programs marked 
witha »&. 


W/FL ASH 
0.33 
0.40 
6.00 

27.00 


W/0 FLASH 
WORD STAR 2.0 
BASICA 2.4. 
LINKING 113.8 
SORTING FILES 105.0 


THE UTILITY ROOM 
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either). 

* may replace !; that is, the com- 
mands **, *%, and *<pat> may be 
used in place of !!, !%, and !<pat>. 
The * commands work just like the ! 
commands except that the line is 
brought into an edit buffer that you 
can then manipulate in the normal 
way (with the cursors, etc.) before ex- 
ecuting it. Unlike DOS, the command 
line is visible while you're editing it. 
Note that Esc will abort out of edit 
mode without executing the edited 
command line. 


Environments, Shell Variables, 
and the Set Command 

Shell variables are macros. They let 
you associate a body of text with a 
name, and when that name is used, 
the corresponding text is substituted. 
Shell variables are created with the 
set command and deleted with the 
unset command. They work some- 
thing like Unix and DOS environ- 
ments except that they can't be 
passed to a child process. Once a shell 
variable is created, it can be used 
anywhere in a command. For exam- 
ple, you can define a shell variable to 
represent a long directory spec with: 


set HOME /usr/allen/src/shell 


You can then use it on the command 
line: 


cd $HOME 


Cd $HOME will be expanded to cd 
/usr /allen/src/shell before the shell 
executes the line. Note that $ must 
precede all uses of shell variable 
names but must not be in the defini- 
tions; % may be used instead of $ if 
you prefer. There are several prede- 
fined shell variables (which can’t be 
modified with the set command). 
These are: 


$<num->-—an argument to a batch 
file ($0 is the file name, $1 the first 
argument, etc.). 

$*—expands to all $<num> vari- 
ables concatenated together. 

$p—expands to the current path 
name. 

$!—expands to the current history 
number. 

$s—expands to the current shell 
level. 
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If youre still paying for mul- 
tiple copies of dBASE or 
RunTime?’ at hundreds of 
dollars a pop, you can stop. 

And use a Word'Tech 
compiler instead. | 

With a Word Tech compiler, 
you only need a single 
copy of dBASE II* or 
dBASE III* for every pro- 
grammer, not every user. 

Then you can distribute 
as many copies of 
your compiled (and 
protected) programs 
as you want with 
no site licenses, 
no runtime fees 
and no strings 
attached. 

Our MS-DOS compilers 
typically run your dBASE 
applications 3 to 10 times 
faster and use just 128K of 
free memory on any MS- 
DOS computer, not only the 
IBM PC. 

You dont pay any penal- 
ties because Word’ Tech 
compilers use the same 
language and syntax as 
dBASE and the same 
index, memory and data 
files (up to 10 data files 
open simultaneously, each 
with up to 7 indexes). 


And you don't pay the 
usual high price because 
Word Tech compilers are 
just $750. Once. 

With a Word lech com- 
piler, you can also run your 
programs on multi-user and 
networked systems. Our 
multi-user compiler runs 
your existing dBASE pro- 
grams under ATal’s UNIX 
System V or CROMIX. 
And our networking 
compiler runs 
your present 
code on 


© 1985 WordTech Systems, Inc. + Trademarks of Ashton-Tate, Inc. | 
CROMIX Trademark Cromemco, Inc. UNIX Trademark AT&T Bell Labs. MS-DOS Trademark Microsoft, Inc. 


I ee 















DOS 3.1 local area net- 
works (LAN’s). The 
compiler will take care of 
file and record locking for 
you, or you can take full 
control using dBASE III 
networking commands. 

We can help you extend 
your applications as well as 
your budgets. You can do 
windows with dBFrame™ 
business graphics 

with dBChart™ 
and even replace 
dBASE itself for 
just $169 with 





dB-XL™ an inter- 
preter with an ex- 


. 
@ tended superset of the 


dBASE III language. 

And we back everything 
with free support, one year 
of maintenance and a 
money-back guarantee. 

For details and the name 
of your nearest dealer, con- 
tact Word Tech Systems, 
Inc., P.O. Box 1747, Orinda, 
CA 94563. (415) 254-0900. 
TELEX 503599. 

You owe it to your wallet 
to call now. 


WORDTECH 
SYSTEMS 
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(Continued from page 20) 


The top-level shell is 0. If you create a 
shell within a shell, the second one 
will be at level 1. All batch files are 
executed in their own shells. 

There are three other shell vari- 
ables that can be modified with set 
but can't be expanded with $name. 
These are echo, verbose, and cmd. If 
echo is set (with either a set echo or a 
set echo = 1), then commands will be 
echoed to standard output just before 
they're executed. The default is echo 


ary 3 


We rea 
Bridges The Gap 


Between Single-user 
And Multi-user. 


Speed. 


aT ita) cm 


mods SMUT Ue Be ELF 
database management system. Written in C, 
FoxBASE is an extremely portable interpreter/ 
MTT eM ecm Lee Cem Mele Ts 
or gperating system to another without changing 
NOU ae) Ie Ce UT USM Leet lm CoH 
your investment in programs by insuring their 
TSM UE UCM) Ciel Teme A CL 


environments. 


SY EEN SUB tt Se Cun on Ps eR yout 
IBM-PC NET is a trademark of IBM Corp. MS/PC-DOS is a trademark of Microsoft rir) 9 5 


Unsurpassed Program Development 


FoxBASE™ uses a state-of-the-art B+ Tree Do 
SUT MCMC MTR MCLG BLES 
A sophisticated virtual storage technique 
WMT UNCUT lee 
works to insure that frequently referenced 
programs are retained in memory in compiled 
form. What's more, FoxBASE provides automatic 
8087/80287 math coprocessor support for 
ultraquick program execution speed—as much 
as six times the speed of dBASE II® 


off (unlike MS DOS), so you musi set 
echo inside a batch file if you want to 
see what the batch file is doing. The 
echoed line will show all macro sub- 
stitutions and all wildcard expan- 


to the 127 characters permitted by 
DOS. You can use this feature to see if 
the command line has been truncat- 
ed when you're invoking a program 
that doesn’t know about the CMDLINE 
environment (see below). 

Verbose shows the input as the 





ed). If cmd is set (the default), then an 


Vititneee a 


ney Sat Reece 


CoN) mM CLO RSU TCH LUO leche ACTH em TL 
macro usage—and data file compatible with the 
WSU ame mE] EUS 
existing dBASE II databases can be used 
TTT (Om Tg TCL TRUCOS 
MUU M Meme Ae TED ele 
dBASE II programs at your disposal. 


Available Under Multi-user Systems. 


Our multi-user versions of FoxBASE feature 
ELA mE ae A) GREATNO ETC 
CSTR UM Come a UC Teme] HC sam Oks 
of termcap, so FoxBASE can run on virtually any 
terminal. And, with some versions, a two billion 
Cima Cv il eam] 
WIT =lam sles e) ass 

Xenix® $995. Multilink” $995. 

IBM-PC NET™ $995. 
Single-user Versions: 

MS/PC-DOS™ $395. AOS/VS $995. 


Don't be outfoxed by the others. 
Call or write Fox Software today. 


FOxBASE @ 


FOX SOFTWARE, INC. 


27475 Holiday Lane, Perrysburg, OH 43551 
419-874-0162 
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sions; however, it will be truncated | 


shell receives it (before it’s interpret- | 





environment’ variable’ called 
CMDLINE will be created every time a 
file is executed. CMDLINE holds the 
entire 2,048-byte command line 
(which can't be passed via DOS). If 
cmd is cleared, then CMDLINE is still 
created but will have no contents. 
Echo, verbose, and cmd can be 
cleared with set <name> = 0. Note 
that setting echo or verbose has the 
same effect as specifying —x or —v 
on the command line used to invoke 
the shell. 

Environment variables (or strings) 
are similar to shell variables except 
that they can be passed to a child pro- 
cess (a pointer to them is included in 
a child’s PSP). Many compilers (at 
least the Aztec, Lattice, and Micro- 
soft) have a getenv(name) function in 
their libraries that returns a pointer 
to the environment string corre- 
sponding to name. If you need to 
write your own getenv( ), a good de- 
scription of the PSP can be found in 
The Peter Norton Programmer's 
Guide to the Norton IBM PC (Bellevue, 
Wash:: Microsoft Press, 1985), pp. 
260f. 

Environment variables can be set 
from within the shell with the setenv 
command. Unlike DOs, they can be 
used on the command line just like a 
shell variable (precede the name 
with $ or %). 


Special Characters 

* and ?—have the same significance 
as in MS DOS. They are expanded 
by the shell to matching file 
names. Expanded names are sort- 
ed. For example, echo *.c *.obj 
would print a list of all the .c files 
in the current directory (sorted) 
followed by all the .obj files (also 
sorted). 

;—is used to separate multiple com- 
mands on a single command line. 
Cd foo;pwd would change the cur- 
rent directory to foo and then exe- 
cute the pwd command. 

\—is used to take away the signifi- 
cance of a special character. For 
example, \* can be used to pass an 
asterisk to grep (the * won’t be ex- 
panded). \ ; can be used to define a 
multiple command alias (see 
below). \\ evaluates to a_back- 
slash. The \ will be stripped from 
the line before the line is passed to 
the child process. 


quotes—text surrounded by double 
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(’) or single (’) quotes won't be 
modified (wildcard characters 
aren't expanded, semicolons 
aren't interpreted as command 
delimiters, etc.). The quotes aren't 
removed unless the —q argument 
is given on the command line. Un- 
like Unix, there’s no distinction 
made between single and double 
quotes. 

#_-when found in the far left col- 
umn, signifies a comment. The re- 
mainder of the line is ignored, and 
the line isn’t put into the history 
list. 


Aliases 

Aliases are another sort of shell- 
maintained macro. Unlike shell vari- 
ables, a $ is not needed to expand the 
name; rather the alias is expanded if 
its name is found as either the first 
word on a line or the first word fol- 
lowing a semicolon on a multiple- 
command line. Aliases have two 
uses: They can be used to change the 
name of a command and they can be 
used in place of batch files. Aliases 
are created with the alias command. 
Some examples: If you have a pro- 
gram called /s that prints the current 
directory but you also want to be 
able to type dir and get a directory 
listing, you can define an alias for dir 
as follows: 


alias dir l|s 


Thereafter, when the shell finds 
dir as the first word on a line, it will 
substitute the string /s for the string 
dir, and the program Is will be exe- 
cuted. Only the first word of a com- 
mand is modified so dir foo bar rat 
will be changed to Is foo bar rat. 
Aliases must be either the first word 
on a line or the first word following 
the semicolon when there are sever- 
al commands on one line. 

Aliases can also be used in place of 
batch files, provided that no argu- 
ments need to be expanded. Because 
aliases are memory resident, they 
will execute much faster than a 
batch file. Similarly, an alias doesn't 
execute under its own shell, as does a 
batch file, so much less core is need- 
ed to execute an alias than is needed 
to execute a batch file. A simple alias 
that is similar to a batch file is: 


alias shell cd /src/util/shell 
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Now you can type the single word 
shell, which the shell will expand to 
cd /src/util/shell and then execute to 
move to the indicated directory; how- 
ever, you can’t expand arguments. 
The portion of the command line that 
follows the alias name will be concat- 
enated to the end of the expanded 
alias. Let’s look at an example: Poly- 
make lets you specify a default rules 
file on the command line with a —B 
option, but you often have to make a 
target name as well. By defining the 
alias m with: 





alias m make —B /lib/ 
builtins.mak 


you can then type m foo.exe and the 
shell will expand it to: 


make —B /lib/builtins.mak 
foo.exe 


Because you can have multiple 
semicolon-delimited commands on 
one line, you can define an alias that 
will expand to several commands. 
For example: 










or two debugging sessions. 


comments, read variables. 
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AT86- Advanced Trace86 
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DEBUG FAST! 


As a professional, your time is valuable. Advanced Trace86™ is 
designed as a debugging environment to increase productivity. 
In many situations, Advanced Trace 86™ can pay for itself in one 


Advanced Trace86" 
FEATURES 


¢ Trace Screen with user-configurable windows for disassembled 
code, registers, flags, the stack, the 8087 registers, and memory. 


e Single-step tracing with virtually unlimited back tracing. 


e In-line assembly capabilities, edit .EXE and .COM files in memory 
(including non-destructive line insertion for .COM files). 


e Symbolic debugging capabilities - read or create line labels and 


Debugger Comparison Chart - Selected Features 


Features AT86 Code. Per. 
| 1. Load Program as memory resident (like Sidekick) | X | |X 
| 2. 1BM Professional DEBUG & Periscope boards supported | X |_| X_ 

3. Keyboard break-out support- Ctrl-Enter key combo aM | ae ee 
[4.Conditional breakpoints = XX 
| 5.HexiDecimal calculator & converter, TX | CX | 
| 6. Convert numberstobinary 0 
L POMSGWCn AM Memrue) Sei hee To 
| 8.In-line Assembler with code insertioncapability | X | X | 
[ 9, 80286/80287 supportinAssembler/Disassember | X | | 
/10. Protect Virtual Mode Support forsoz86_ TX | 
11. 8087/80287 window -registers in both decimal &hex | X | | 
[12. Display memory in ASCII, byte, word, &doubleword | X |X | 
[13. Define “memory structures” fordisplaylediting | X || 


}16.Command macros defined &savedtodisk | X 
117.DOSTYPE,DIR,&ERASEcommands CX 


Code.-Codesmith 


Requires: IBM PC or compatible, minimum 128K RAM. Retail Price - $175.00 


Morgan Computing Co., Inc. 
P.O. Box 112730 Carrollton, Texas 75Oll (214) 245-4763 
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C- CHEST: 
(Continued from page 23) 


alias m rm err \; make —B /lib/ 
builtins.mak 


will expand to 


rm err ; make —B /lib/ 
builtins.mak 


thereby both removing the file err 
and executing make. Note that you 
must escape the semicolon (with a \) 


— 





tron’s PC/AT Bugbusters 


in the alias definition so that the shell 
won't intercept it. (You could also 
surround the definition with quotes.) 

Aliases may use shell variables. 
Two such aliases are: 


alias here set here = \$p 
alias there cd \$here 


Here will set the shell variable here to 
the current directory. There will put 
you in the directory remembered 
with a previous here invocation. Note 
that $ has to be escaped to prevent 
the shell from expanding it when the 








Hardware-assisted Software Debuggers for Bullet-proof PC/AT-based Products 


















A BUGBUSTER STORY 
Brad Crain, a project 
manager at Software 
Publishing (the people 
who developed both 
PFS:WRITE and PFS: 
FILE), relates the follow- 





ing: “On Friday, March 2 = 
22, 1985, I was about to 4.2 4% 
get on an airplane with 52 
Jeff Tucker, who was co- ; oo 
author of PFS:WRITE 6 8 134 
with me, and fly to 7 
IBM’s Boca Raton, Flor = {5 
ida facility. For a week, = 42: 10-139 
we had been unsuc- #3) 118 
cessfully trying to isolate su 
a bug in a new software 1 - 1 
product. In a last, desper- c 
ation move, I set up an 1919 


early-Saturday morning 20 20 
appointment with 3 
ATRON. 23:24 

“Three of us walked 2 ~ ' 
through ATRON’s door = 
at 8:00 the next morning. 27:25 4 
Using ATRON’s hard- = 38 = : 
ware-assisted debugging 0 a 
tools, we had the prob- Co 
lem identified and fixed 
by 10:30AM.”’ 

Mr. Crain concludes: 
“We'd never have found 
the bug with mere 
software debuggers, which have the bad habit of getting 
over-written by the very bugs they’re trying to find. It 
doesn’t surprise me that almost all the top-selling soft- 
ware packages were written by ATRON customers. Now 
that they’ve broadened their PC family of debuggers to 
include a PC/AT debugging tool, those of us seriously 
into 80286 development are greatly relieved.”’ 


ARE YOU TRYING TO DO SOMETHING SCAREY? 

Like developing your AT-based software product in the 
dark? Without professional debugging tools? 

Seven of the ten top-selling software packages listed by 
the THE WALL STREET JOURNAL* were produced by 
ATRON customers. The PC PROBE™ bugbuster 
($1595) accounts for much of this success. Now that the 
PC/AT is the new standard for advanced commercial and 
scientific development, ATRON is proud to announce the 
AT PROBE™ bugbuster ($2495). It has even more 
debugging capabilities than the PC Probe. 


GS KO ba we 
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*WS]J, June 24, 1985, reporting Softsel figures. © 1985 by ATRON. PC PROBE™ and AT PROBE™ ATRON. SIDEKICK ™ 


HOW BUGBUSTERS KEEP YOU FROM GETTING SLIMED 
The AT PROBE is a circuit board that 
plugs into your PC/AT. It has an 
umbilical which plugs into 
, your 80287 socket and 
. monitors all processor 
activity. 

Since AT PROBE can 
trace program execution in 
real time, and display the 
last 2048 memory cycles, 
you can easily answer the 
questions: “How did I get 
here?’’ and “‘What are the 
interrupts doing?” 

It can solve spooky 
debugging problems. 
Like finding where 
your program over- 
writes memory or I/O - 
impossible with soft- 
ware debuggers. 

You can even do 
source-level debugging 
Fe in your favorite lan- 
guage, like C, Pascal or 
assembler. And after 
* your application is 
i = debugged, the AT 
%: ~ PROBE’s perfor- 
mance-measurement 
software can isolate 
your application’s 
bottlenecks. 

Finally, the AT PROBE has its own 1-MByte of mem- 
ory. Hidden and write-protected. How else could you 
develop that really large program, where the symbol 
table would otherwise demand most of your PC/AT 
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“memory. 


BORLAND’S PHILIPPE KAHN: “THERE WOULDN'T BE A 
SIDEKICK™ WITHOUT ATRON’S DEBUGGERS.” 

So why waste more time reading though your program 
listing for the ten thousandth time, trying to find why your 
program starts howling with every full moon. Be like 
BORLAND, get your Atron bugbuster today and bust 
bugs tomorrow. 


THE DEBUGGER COMPANY 
20665 Fourth Street @ Saratoga, CA 95070 408/741-5900 


Borland. IBM Corp. owns numerous trademarks. Ad by TRBA. 
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alias is defined. 

A caveat about aliases: Aliases de- 
fined in terms of other aliases won't 
work. For example: 


alias foo echo foo 
alias bar echo bar 
alias foobar foo;bar 


won't work (foobar will expand to 
foo; echo bar). However, the com- 
mand line foo;bar will work. Also 
note that commands are added to the 
history list before aliases are 
expanded. 


Environments and Files 

The default command line prompt is 
[$s,$!) (which prints the current shell 
level followed by the current history 
number). You can specify a different 
prompt with the PROMPT environ- 
ment variable (use either the DOS set 
or the shell’s setenv command). Any 
ASCII character may be used, and any 
of the $ arguments will be expanded 
before the prompt is printed. For 
example: 


setenv PROMPT $p— > 


will change the prompt to the cur- 
rent directory name followed by — 
and >. The prompt can be changed 
at any time (it doesn't have to be set 
when the shell boots). The SWITCHAR 
environment variable tells the shell 
what character signifies a command- 
line switch when it’s the first charac- 
ter in a command-line argument (the 
default is —). Because environments 
are inherited by the child process, 
SWITCHAR is also available to a pro- 
gram if it chooses to use it. 

The CMDLINE environment holds 
the complete, 2,048-byte command 
line (which can’t be passed via DOS). It 
is changed every time the shell exe- 
cutes a command. Note that the com- 
mand line (truncated to 127 charac- 
ters) is also passed to a child process 
in the normal way (via the DOS com- 
mand line buffer at offset 0x80 from 
the child's initial code segment). 
When the shell spawns a subshell to 
execute a batch file, it uses CMDLINE. 

The SHLEV environment is set to 
the current shell level. The outer- 
most shell is at level 0. All shells cre- 
ated from within another shell (in- 
cluding those used to execute batch 
files) will have higher numbers, de- 
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pending on the level of nesting. 

Several files are used by the shell. 
If it exists, the file /shrc.bat is execut- 
ed (in a manner analogous to autoex- 
ec.bat) every time a shell is created. 
Because batch files are executed in 
their own shells, /shre.bat will be ex- 
ecuted every time a batch file is exe- 
cuted. A second file /login.bat is exe- 
cuted only once, when _ the 
lowest-level (level 0) interactive shell 
is created. Shrc.bat is executed before 
login.bat, and both files are executed 
before the environment is examined. 
My own login file is shown in Table 
1, at right. My logout file is simply !> 
and lets me leave the shell without 
losing the current history list. Note 
that !< in login.bat lets me reenter 
the shell without losing the list. You 
could also use !< (without the !>) to 
read in a list of commonly used com- 
mands when the shell boots. 


Shell Invocation Syntax 

There are several ways to get into the 
shell from the command line. The 
easiest way is to type sh (with no ar- 
guments), putting you into interactive 
mode. You can't get out of the lowest- 
level interactive shell with a *C. Use 
either exit or logout. 


sh —c string—invokes the shell in 
nonresident mode. It will execute 
the command contained in 
<string> as if it had been entered 
from the command line and then 
terminate. 

sh filename args. ..—executes a 
batch file. $0, if found inside the 
batch file, will be expanded to the 
file name. The arguments can be 
fetched with $1, $2, etc. 4 can be 
used instead of $ if you like. 


Four other command-line switch- 
es are available: 


—i—puts the shell into interactive 
mode even if arguments are listed 
on the command line. Normally, if 
command-line arguments are 
present and —c isn’t specified, the 
shell will try to execute a batch 
file. sh —i arg... arg will create 
an interactive shell, putting the ar- 
guments into $1, $2, etc. $0 will 
hold the string —1. 

—q—causes quotes to be stripped 
from commands before they're 
passed to a child process. The 
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setenv PROMPT =[\$s:\$!] 





alias a alias 

ah history 

a book cd /text/book 

a ddj cd /text/ddj 

a here set here = \$p 
a sclass cd /src/class 

a there cd \$here 

a tmac cd /lib/tmac 

a tools cd /src/tools 

a type cat 

am ‘“‘rm err; make -B builtins. mak’’ 


Table 1: A login.bat file 


quotes will still protect wildcard 
characters, etc., from expansion. 

—y—verbose mode, commands are 
echoed to stderr as they're read 
by the shell. This is the same as a 
set verbose command. 

— x—commands are echoed to stderr 
just before they’re executed. All $ 
arguments and wildcard charac- 
ters will have been expanded at 
this point. This is the same as a set 
echo command. 


Redirection 

The shell itself doesn’t support redi- 
rection; however, because com- 
mand.com is still resident, redirec- 
tion is available if you need it. There 
are two ways to use command.com 
for redirection. A nonresident shell 
can be invoked from DOS with a line 
such as: 


sh —c grep pattern *.c >foo 


Grep will be executed, and the shell 
will expand the *.c to the names of 
all files in the current directory hav- 
ing a .c extension before grep is in- 
voked. Grep’s output will be redirect- 
ed to foo in the normal way. Because 
this command is executed from MS 
DOS and not from the shell, it won't 
be added to the history list. 

The second method also lets you 
enter redirected commands into the 
history list. From inside the shell, 


type: 
command /c grep pattern *.c >foo 


The /c argument to command.com 
works like the —c argument to sh, so 
it will execute the following string as 
if it had been typed. The *.c will 
again be expanded by the shell be- 
fore command.com is executed, but 
the > will be interpreted by com- 
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mand.com (which will put the out- 
put into foo). Be careful here of com- 
mand-line truncation. Because 
command.com doesn’t know about 
the CMDLINE environment, it has no 
way to get to the extended command 
line, so it will work on only the first 
127 characters. 


Support Routines 

In order to minimize the size of the 
shell, I’ve tried not to build in com- 
mands that aren’t essential. I’ve 
found the following programs to be 
usefull. 


cat.c—prints (concatenates) files to 
stdout. 

cp.c—copies a file to another file or 
disk. Copies a group of files to an- 
other directory or disk. 

echo.c—echoes command line to 
stdout. 

grep.c—searches for pattern in file. 

ls.c—lists a directory. 

mkdir.c—creates a directory. 

mv.c—renames a file or moves a 


group of files to another 
directory. 

printenv.c—prints the current 
environment. 


rm.c—removes a file or group of 
files. 
rmdir.c—removes a directory. 


Availability 

This column is part of a four-part se- 
ries describing the entire shell. A re- 
print of all four parts along with a 
disk containing the listings is avail- 
able for $29.95 from Dr. Dobb’s Jour- 
nal, 2464 Embarcadero Way, Palo 
Alto, CA 94303. Please direct inquiries 
to the The Shell. Prepayment is 
required. DDJ 

(Listing begins on page 84) 
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Assembly Language 








by Edward K. Ream 





ne day not 
q) long ago, I be- 
came em- 


broiled in an old de- 
bate with another 
programmer named 
Charlie. ... 

“The programming 
team I manage is about 
to start a big project,” I 
said, ‘“‘and I must de- 
cide which language 
to use.” 

“Really? Which lan- 
guages are you considering?’ 

“C and 68000 assembly language. The product will 
have strong competition, and great performance is cru- 
cial, so it's reasonable to consider assembly language. On 
the other hand, C is so much easier to use.”’ 





“Why don't you program in C and recode in assembly | 


language as needed?” Charlie asked. 


Of course I've considered that. It might work as far as | 


execution speed is concerned, although I’m not sure. C 


handicap. Speed is not the only problem, though. The 


have to be written in assembly.” 


Copyright © 1985 by Edward K. Ream, 1850 Summit Ave., 
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I asked myself, suppose the 
program produced by the C 
compiler and the program 
produced by the assembler were 
semantically equivalent? Suddenly 
PL/68K became not just another | 
assembly language but anew _ 
way of using C. 








“Do the initial proto- 
typing in C. That's the 
right way,’ Charlie 
persisted. ‘When the 
program is finished, 
recoding in assembly 
language will be much 
easier. | 

“Hmmm. I'm not 
convinced. Recoding is 
going to be expensive; 
well end up debug- 
ging the whole pro- 
gram twice. There 
might even be pressure from higher management not to 
recode and come out with an inferior product.’’ 

Charlie just snorted and walked away, muttering 
something about assembly language being a throwback 
to the Dark Ages. 









Writing in Both C and Assembly 


Fortunately, my friend John overheard this conversa- 


_ tion. John and I have worked together for 15 years, and 
doesn't let you allocate registers globally, and that’s a big | 


we enjoy discussing problems that come up on the job. 


_ John laughed, “Charlie is more interested in being right 
code must be compact, but our C compiler produces code | 
that is 50 percent larger than assembly language. No, | 
there's no doubt about it—eventually the program will | 


about C than in solving your problem.” 

“You sound more sympathetic. ”’ 

“Well, your choice is crucial. Which language you use 
determines, to a large extent, how your project will turn 


| out.” 


“Yes. What bothers me most is that I’ve got to choose 


_ now, but I won't know until the project is almost over 
| whether the choice was correct.”’ 
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“T think I know a way around this dilemma— it’s a lan- 
guage I invented called PL/68K.” 

“John, my only options are C and 68000 assembly lan- 
guage. 

‘Don’t be fooled by the name. PL/68K isn't really an 
independent language but a way of using C to do assem- 
bly-language programming. 

“John, you are not making sense!”’ 

“Let me explain. You can think of PL/68K as being ei- 
ther C or assembly language—either/or. But in fact, you 
can run a program written in PL/68K through both the 
PL/68K assembler and any standard C compiler. PL/68K 
is both C and assembly language at the same time.” 

“Wait a minute. You are going much too fast,” I said. 
“First of all, you can’t possibly compile an assembly-lan- 
guage program with a C compiler! Assembly language 
doesn't look anything like C—the C compiler will spit out 
a thousand error messages! ” 

“PL,/68K doesn’t resemble ‘traditional’ assembly lan- 
guage. Forget what assembly language usually looks like 
and ask yourself, ‘What are the characteristics of assem- 
bly language?’ ” 

“Go on,” I replied. “You tell me.” 

“First, assembly language allows full access to all ma- 
chine resources—all registers, all locations in memory 
(including the run-time stack), all I/O ports, all privilege 
modes, and all machine instructions. Second, there is a 
one-for-one correspondence between the source code 
you write and the object code produced by the assem- 
bler. You always know what code a particular assembly- 
language construct generates; assemblers neither rear- 
range code nor ‘optimize’ code away nor add anything 
extraneous. Assemblers are very literal-minded. Thus, as- 
sembly language ensures zero time and space overhead. ” 

“You're saying that assembly language gives you com- 
plete control over the machine, without a compiler get- 
ting in the way.” 

“Exactly. Now, suppose we say assembly language is 
any language that (1) allows complete access to all ma- 
chine resources, (2) provides a clear correspondence be- 
tween source code and object code, and (3) imposes zero 
time or space overhead.” 


Semantic Identity 
‘Hmmm,’ I mused. ‘‘This definition doesn't say what as- 
sembly language looks like. It could even look like C. But I 
still don’t understand. If you run a PL/68K program 
through an assembler, you will get one program. If you 
run the same source through a C compiler, you will get a 
second program. The two programs are not going to do 
the same things—similar things, maybe, but not the same 
things. The fact that the source code is the same doesn t 
matter. To put it another way, given a result desired from 
a specific PL/68K program, we would still have to choose 
between assembling the program with the PL/68K as- 
sembler or compiling it with a C compiler.” 

“You've stated the problem very well,” John said, “but 
I have discovered that it’s possible to design PL/68K so 
that the program produced by the PL/68K assembler will 
work in the same way as the program produced by the C 
compiler. ”’ 

“That sounds impossible!” 
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“T don’t think so. Let’s turn the problem around. Sup- 
pose we design PL/68K according to what might be 
called ‘the principle of semantic equivalence.’ This prin- 
ciple states that a program, when assembled by the PL/ 
68K assembler, must work in the same way as when it is 
compiled by a standard C compiler. Now let's ask, ‘What 
needs to be eliminated from PL/68K to guarantee seman- 
tic equivalence?’ ’’ (See Figure 1, page 40.) 

“Tell me,’ I said, ‘“how much of C is left after the prin- 
ciple of semantic equivalence takes its toll?” 

“Surprisingly, almost all of it. The preprocessor is iden- 
tical to the C preprocessor. All declarations and structure 
statements are present. Functions do not return values 
but otherwise are unchanged, as are Boolean and rela- 
tional operators and expressions. The biggest restriction 
is that arithmetic operators and expressions must be se- 
verely curtailed in order to make PL/68K expressions 
mean the same thing as C expressions. ’ 

“You keep talking about PL/68K being assembly lan- 
guage,” I said. “How is it possible to produce code the 
quality of assembly language from a language that is a 
subset of C?”’ | 

“T haven’t shown you the whole language yet. Two 
other rules guide the design of PL/68K. These rules, to- 
gether with the principle of semantic equivalence, deter- 
mine the form and content of PL/68K. The two rules are 
‘the code selection rule’—the assembler for PL/68K does 
no code selection, and all arithmetic operations in PL/ 
68K correspond to unique 68000 machine instructions; 
and ‘the register allocation rule’—the assembler for PL/ 
68K does no register allocation, and all operations in an 
assignment statement are performed in the location spec- 
ified by the left side of that assignment statement. 

‘Tn short, these rules say that an assembler for PL/68K 
never has to make any significant decisions. Because the 
PL/68K assembler knows how to select code and allocate 
registers, it will never need any of the fancy techniques 
used by optimizing compilers, but it will be able to pro- 
duce code that is just as good as assembly language. 

“T like to think of the assembler for PL/68K as a simple 
compiler, consisting of a parser and straightforward 
code generator and possibly a peephole optimizer. The 
whole job should take about a year to complete rather 
than the 10 to 20 programmer years for a typical optimiz- 
ing compiler. Using compiler technology to write an as- 
sembler was the initial idea that started me thinking 
about PL/68K.” 

Now that I’ve presented the general ideas behind PL/ 
68K, I'll drop this dialogue format and these fictional 
characters and look at the details of the language. 


Specifving Registers 
Because PL/68K is both assembly language and C, some 
way must be found to deal with assembly-language con- 
structs such as registers, address modes, and individual 
machine instructions, while at the same time remaining 
compatible with C. These assembly-language constructs 
are represented by reserved words, shown in Table 1, 
page 29. 

As for the registers of the 68000, dO through d7 stand 
for the data registers, a0 through a7 for the address regis- 
ters, pc for the program counter, ssr for the status regis- 
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ter, and ccr for the condition code register, which is the 
lower byte of the ssr. 

Standard aliases are also defined. Register a7 can also 
be called sp, ssp, or usp to denote the stack pointer (or 
system stack pointer or user stack pointer). The reserved 
words r0 through r7 are synonyms for dO through d7, 
and the names rg through r15 are synonyms for registers 
a0 through a7. 

All registers on the 68000 are 32 bits long (except the 
status registers), but not every instruction uses all 32 bits 
of a register. Besides long (32-bit) operations, byte-length 
(8-bit) and word-length (16-bit) operations are permitted 
on data registers, and word-length operations are permit- 
ted on address registers. To represent the length of an 
operation, the name of any data register can be followed 
by a b to denote byte length or a w to denote word length. 
Thus, dO stands for the long register d0, dOW stands for 
the word-length register d0, and dob stands for the byte- 
length register dO. Address registers are treated in a simi- 
lar manner, except that byte-length operations are not 
permitted. 


Address Modes 

The 68000 has 12 different address modes, or means of 
accessing operands. (See Table 2, page 29.) The address 
modes are represented in PL/68K by five of C’s operators, 
namely &, *, ++, ——,and —>. 

Let's look, for example, at the Address Register Indirect 
with Postincrement address mode. (It’s a lot easier to use 
than to say.) This mode uses the contents of an address 
register as the address of an operand. After the operation 
is performed, the address register is incremented by 1, 2, 
or 4, depending on the size of the operation. In traditional 
assembly language, that mode applied to address register 
a0 would be written as (a0)+. In PL/68K, that address 
mode is represented by *a0+ +. For example, you would 
write dO0b=*a0++; in PL/68K instead of move.b 
(a0)+,d0b. Constructions such as *+ +a0 are not allowed 
because of the code selection rule. The 68000 has no ad- 
dressing mode of the form +(a0), so *+ +a0 is not part of 
PL/68K. 

The word primitive denotes what is called an effective 
address in machine-language terms. A primitive de- 
scribes an operand, which may be in a register, on the 
run-time stack, or in static memory. In PL/68K, the valid 
forms of primitives are determined by the address modes 
I've just discussed. 


| Declarations 


While I am talking about operands, I'll say a few words 


_ about how those operands are declared. Declarations in 


PL/68K are just the same as in C, except that functions do 


_ not have types. If you think about it for a moment, this 
_ means that PL/68K declarations have no parentheses. 
| Declarations can never become unreadable as they can in 


full C. 
In effect, declarations produce DC (define constant) and 


DS (define storage) pseudo-operations. (See Table 3, page 
| 29.) Although declarations produce no executable code, 
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they determine what code gets produced by arithmetic 
operators. For instance, if a is an integer, the assignment 
statement a *= b, which multiplies a by b, generates a 
MULS (signed multiply) machine instruction, but if a is an 
unsigned integer or pointer, the assignment statement 
generates a MULU (unsigned multiply) instruction. 

As another example, the assignment a += b, which 
adds b to a, generates an ADD.B (byte length add) instruc- 
tion if a is a char, but it generates an ADD.W (word length 
add) instruction if a is an int and generates an ADD.L (word 
length add) instruction if a is a long word or a pointer. 


Assembly-Language Instructions and 
Pseudo-operations 

Reserved identifiers also stand for 68000 machine-lan- 
guage instructions and pseudo-operations. A library of 
pseudofunctions must be linked with a PL/68K program 
when it is translated with a C compiler. This library, 
called the ops library, contains declarations and func- 
tions that allow C programs to simulate the effect of 
68000 machine instructions and pseudo-operations. (See 
Table 4, page 32.) 

The pseudofunction btst( ), for example, simulates the 
BTST (bit test) machine instruction. In PL/68K, you would 
write btst(1,d0b); in those places where you would write 
btst.b #1,d0 in traditional 68000 assembly language. 

Other pseudofunctions allow PL/68K programs to re- 
fer to assembly-language pseudo-operations. The PL/68K 
assembler translates the org( ), even( ), bss( ), text( ), and 
data( ) pseudofunctions to the ORG, EVEN, BSS, TEXT, and 
DATA pseudo-operations. Similarly, the PL/68K assem- 
bler translates the dcb( ), dcw( ), dcl( ), dsb( ), dsw( ), and 
dsl( ) pseudofunctions to the DC.B, DC.W, DCL, DS.B, DS.W, 
and DS.L pseudo-operations. None of these pseudofunc- 
tions has any effect when a C compiler translates a PL/ 
68K program. In other words, the corresponding pseudo- 
functions in the ops library do nothing. 

You may be wondering why I keep calling these rou- 
tines pseudofunctions. After all, they are perfectly good 
functions when compiling a PL/68K program with a C 
compiler. When you turn the program through the PL/ 
68K assembler, though, it translates pseudofunctions di- 
rectly into 68000 machine instructions or pseudo-opera- 
tions. 


Expressions and Assignment Statements 

I’ve covered the components of low-level assembly lan- 
guage—registers, address modes and effective addresses, 
machine instructions, and pseudo-ops. Now let's see how 
you put these components together to make expressions 
and assignment statements. 

Expressions are quite restricted; they are just primi- 
tives or parenthesized constant expressions. Assignments 
are restricted to the forms primitive aop expression or 
primitive aop ( assignment ), where aop stands for one of 
the assignment operators of the C language, namely, =, 
fae, te, /=, ==, -=,>>=, and <<=. The 
regular arithmetic operators in C, namely 7," 7,6. 
* >>, and << are allowed only in constant expres- 
sions, which must be parenthesized. 

You are probably wondering why all these restrictions 
exist. There’s a short answer and a long answer. The 
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Data registers 
dO, d0b, dOw,..., d/, d/b, d/w 
rO, rOb, rOw,.... ,r7, r7b, r7w 


Address registers 

a0, aQw,...,a7,a7w 

rs, row... -, 115, r15w 

Sp, Spw, uSp, uSpw, ssp, sSpw 


Status registers 
ssr, ccr 


Program counter 
pe 





Table 1: Reserved words corresponding to 68000 

registers 
PL/68K Traditional assembly language 

123 

abc 

&abc 

*(&abc+ 1) 

abc.25 abc+ #25 

*(0x80) $80 

a0 a0.| 

a0.w 

do.l 

d0.w 

d0.b 

(a0) 

(a0)+ 

—(a0) 

#5(a0) 

#0(a0, dO0.1) 

#0(a0, d0.w) 

#5(a0, dO.!) 

#5(a0, dO.w) 

#5(pc) 

#0(pc, d0.l) 

#0(pc, d0.w) 

#5(pc, dO.1) 

#0(pc, d0.w) 


#123 
abc 
#abc 
abc+ #1 


dO0b 


"a0+ + 

'> ad 

a0 — 5 

a0 — dO 

a0 — (dOw) 

a0 — (d0+5) 
a0 — (dOQw+ 5) 
pe — 5 

po = dO 

pc — (d0Ow) 

po = (d0 +5) 
pc — (dOw+5) 





Table 2: Representing the address modes of the 68000 


Declaration Code Generated 
abc: ds.b 

dc.b 

ds.| 

ds.| 

dc.b 

ds.w 


abc; 
c1='C; cr 
* CD: cp: 
long xyzZ; XyZ: 
char a[] = “abc”; a: 
int a2 [25]; a2: 
struct s1 { 


char 
char 
char 


long sl; 
char *s2; 
int. s3: 
}; no code generated. 


struct $1 s2 [25]; s2: ds.b | 200 
union u1 { 

int =u; 

char uc; 

long ul; 


Table 3: Code generated for declarations 
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short answer is that it’s the only way to reconcile all of 
the design rules behind PL/68K with all of C’s rules con- 
cerning operator precedence and arithmetic conver- 
sions. Take my word for it: You cannot have full C ex- 
pressions in PL/68K and still retain the principle of 
semantic equivalence. For the long answer to this ques- 
tion, see the Appendix section. 

There are additional restrictions concerning assign- 
ments to pointers. Suppose, for example, that a0 has been 
declared to be a pointer to some object X whose size is 
larger than 1. In this case, the only assignments allowed 
to a0 are assignments of the form 


a0 += constant; 
(or constant expression) or 
a0 — = constant; 


To conform to C’s scaling rules, these constructions are 
equivalent to 


ADDA CONSTANT * SIZEOF(X), AO 
SUBA CONSTANT * SIZEOF(X), AO 


If you do not want this scaling to take place, you can © 


use the adda( ) or suba( ) pseudofunctions. In general, no 
scaling, optimization, or other kind of tampering is ever 
done to the arguments of pseudofunctions. This rule has 
no exceptions. 

Two special forms of assignment statements are per- 
mitted: location+ +; and location——;, where location 
stands for an address register, data register, or the name 
of a memory variable. 

A few words about why PL/68K does not have func- 
tion calls and array references—let’s consider function 
calls first. Functions don’t return values in a designated 
location because no single spot is right in all cases. Re- 
turning the results of a function in a register would con- 
flict with the register allocation rule. Thus, the program- 
mer must specify how functions will return values. Note, 
however, that you can pass arguments to a function in 
the normal way, as you shall see shortly. 

The array operator [ ) conflicts with both the register 
allocation and the code selection rules. There is no suit- 
able spot in which to evaluate subscript expressions, and 
picking a spot at random would violate the register allo- 
cation rule. (Actually, no single location would suffice be- 
cause general C expressions can require arbitrarily many 
temporary locations to evaluate.) In addition, the ‘“natu- 
ral way” to access arrays on the 68000 is with pointers, 
which is how an assembly-language programmer would 
probably do it. Thus, retaining the array operator would 
violate the spirit behind the code selection rule. 

Assignment statements are simple, but that shouldn't 
hurt much—assignment statements usually have only 
one or two operators anyway. 

As the code selection rule requires, PL/68K defines 
what code arithmetic expressions will generate. (See Ta- 
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ble 5, page 32.) The += operator generates the ADD in- 
struction, the — = operator generates the SUB instruction, 
and so on. Many machine instructions on the 68000 have 
several variants—for example, ADDA adds address regis- 
ters, ADDI adds literal data, and plain ADD adds to data 
registers and memory locations. The assembler has to do 
some code selection, but the choice is easy; even tradi- 
tional assemblers do that much. 


Boolean Expressions 

Boolean expressions in PL/68K are similar to Boolean ex- 
pressions in C. All the Boolean operators !, ii, and && and 
all the relational operators ==, /=, <, <=, >,and >= 
are allowed. Of course, arithmetic expressions are re- 
stricted in Boolean expressions just as they are in assign- 
ment statements. 

Boolean expressions in PL/68K are not general expres- 
sions, as they are in C. Boolean expressions can only ap- 
pear in the appropriate part of if, do, while, and for state- 
ments. The code fragment a = = 5; is not valid in PL/68K 
outside a structure statement. This restriction eliminates 
a whole class of hard-to-find errors (the programmer al- 
most certainly meant to say a = b;). 

Because Boolean expressions appear in limited con- 
texts, much less work is required to evaluate them. (See 
Tables 6 and 7, page 32.) Boolean expressions of the form 
primitive or primitive relop 0 or 0 relop primitive (where 
relop denotes one of the relational operators) generate 
the TST (test operand) instruction followed by some form 
of the Bxx (conditional branch) instruction. The Bxx in- 
struction chosen depends on the relop and the declared 
type of the operand being tested. 

Expressions of the form primitive relop nonzero con- 
stant or nonzero constant relop primitive generate the 
CMP (compare) instruction followed by a Bxx instruction. 

The NOT operator generates no code at all but instead 
simply reverses the “polarity”’ of one or more Bxx in- 
structions. For example, the statement 


generates 


TST A 
BNE 


while the statement 
if ((a == 0)) 
generates 


TST A 
BEQ 


Similarly, the |: and && operators generate no extra 
code. Incidentally, you can use parentheses in Boolean 
expressions to affect the order of binding of Boolean op- 
erators. For instance, 


if (a && '(b < 51} b > 20)) 
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look up. 


Eco-C88 ; - Acc and ‘mini-make” (in source) that makes com- 


ee eS piling a snap. 


- ASM or OBJ output (for use with MSDOS linker). 
- Expanded user’s manual. 


! - Works with all IBM PC’s and clones using MSDOS 2.1 
1. P Cawiciiar Language, Feb., 1985. Reproduced with permission. or later. 
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CED Program Editor. $29.95 

A screen-oriented program text editor similar to the Turbo Pascal editor. 
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CED automatically reloads the source file and places the cursor on the 
offending section of code. CED supports editing multiple files (with 
windows), macros, more than 50 editing commands and is configurable to 
your particular needs and preferences. An outstanding value. 
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ORDER FORM 


| OC Compiler $49.95 

~ © Programming Guide $20.00 
2 Self-Study Guide $17.00 
0 Programmer's Library $20.00 
| O Program Editor $29.95 —_ 
~ OC Library Source $10.00 


i " Steg (eee? sige pe ~  C Self-Study Guide (Purdum, Que Corp.) $16.95 

Total® (Ind, res. add 9% tax) Z This new book is designed for the person that is learning 
*Please add $4.00 for shipping. _ Con their own. The book is filled with questions and 
Payment: VISA MC AE Check answers that most beginning C programmers have. It also 
® Credit card expir. date ® includes many sample programs that illustrate tips, traps 
” Sada ™ and techniques that may take years to discover otherwise. 
A perfect compliment to the Guide book. 





C Programming Guide, 2nd Ed. 
(Purdum, Que Corp.) $19.95 

This best seller walks you through the C language in an 
easy-to-read manner. All aspects of the language are 
f covered, including many of the new ANSI Standards 
suggestions. Many of the error messages issued by the 
| Eco-C88 compiler reference page numbers in this text 
making an ideal learning environment. 
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C Programmer’s Library 
(Purdum, Leslie, Stegemoller, Que Corp.) $19.95 

This best seller is an intermediate level text designed to 
show you how to write functions for your C library. The 
book contains many useful library additions, including an 
ISAM file handler, plus sections on advanced C topics. 
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Pseudofunctions corresponding to 68000 machine instructions 

















abcd, add, adda, addi, addq, addx, and, andi, asl, asr 

bcc, bcs, bchg, beg, bge, bgt, bhi, ble, bls, bIt, bmi, bne, bpl, 
bvc, bvs 

bchg, bclr, bra, bset, bsr, btst 

chk, clr, cmp, cmpa, cmpi, cmpm, 

dbcc, dbcs, dbeq, dbf, dbge, dbgt, dbhi, dble, dbls, dbit, dbmi, 
dbne, dbpl, dbt, dbvc, dbvs, divs, divu 

eor, eori, exg, ext, jmp, jsr, lea, link, Isl, Isr 

move, movea, movem, movep, moveg, muls, mulu 

nbcd, neg, negx, nop, not, or, ori, pea 

reset, rol, ror, roxl, roxr, rte, rtr, rts 

scc, scs, seq, sf, sge, sgt, shi, sle, sls, sIlt, smi, sne, spi, st, svc, 
SVS 

sbcd, stop, sub, suba, subi, subg, subx, swap 

tas, trap, trapv, tst, unlk 






Pseudofunctions corresponding to assembly-language pseudo 
operations 


dcb, dew, dcl, dsb, dsw, dsl 
org, data, text, bss, even 







Table 4: Pseudofunctions 


Operator Generated code 





at+=b add b,a (or adda or addi or addq) 
a—=b sub ba (Or suba or subi or subq) 
a*=b muls b,a (Or mulu) 
a/=b divs b,a (or divu) 
a%=b divs b,a (or divu) 
swap a 
a>>=b asr Dba (Or ror) 
a-—-——5 asl b,a (or rol) 
a&=b and b,a (or andi) 
al=b or b,a (Or ori) 
a*=b eor ba (or eori) 
at + addq #1,a _ (or addi) 
a. subq #1,a_ (or subi) 


PSsie Se 


Table 3: Code generated by arithmetic operators 


Boolean Generated code 
if (Z) bnz false 


if (a) tst a 
bz false 


(or cmpa) 


if (a < b) cmp b,a 
bge false 


if (fa) tst a 


bnz false 


if (a && b) tst a 
beq false 
tst b 
beq false 


if (!(a && b)) tst a 
beq true 
tst b 
bne false 
true: 





Table 6: Code generated by Boolean expressions 
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Unsigned Comparisons 


Signed Comparisons 


C2.Cl cmp G2z,c! 
false bne_ false 


C2.cl cmp c2.cl 
false beq false 


cz cl cmp c2,cl 
false bcc false 


if(c1 < = C2) 
C2,cl cmp ¢2,Cl 
false bhi false 


ificl = c2) 
c2,cl cmp c2.cl 
false bls false 


62.cl cmp C2,c1 
false blo false 





Table 7: Code generated by Boolean comparisons 


Pseudo- 
Macro Name function Meaning 
Z or EQ cc 2z zero 
NZ or NE cc nz not zero 
C orcs cc Cc carry 
NC CC cc_nc no carry 
V or VS cc Vv overflow 
NV or VC CC_nv no overflow 
GT cc_ot greater than 
GE cc_ge greater or equal 
LS cc_i6 less than 
LE cc_le less than or equal 
HI] cc_hi high 
LO cc_lo low 
MI cc _mi minus 
PL cc ol plus 


Table 8: Condition code constants 


Syntax 


(1) if ( boolean ) { statement list } 
(2) if ( boolean ) { statement list 1} else { statement list @} 


Code generated for (1) 


$ Evaluate boolean. If false, jump to label 1$ 
$ statement list $ 
label1: 


Code generated for (2) 


$ Evaluate boolean. If false, jump to label 1$ 
$ statement list 1$ 

bra label2; 

label 1: 

$ statement list 2$ 

label2: 





Table 9: The if statement 
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(Continued from page 30) 


is valid and generates 


TST A 
BEO 

CMPI 5, B 
BLT 

CMPI 20, B 
BGT 


You can specify condition code values directly. (See Ta- 
ble 8, page 32.) For instance, the statement if (Z) tests the 
current value of the zero bit in the condition code regis- 
ter and generates the BNZ (branch not zero) instruction. Z 
is a macro in C, defined in the ops library, which expands 
to a call to the pseudofunction cc_z( ). 


Structure Statements 

I said earlier that PL/68K has all C’s structure state- 
ments—if, do, while, for, and switch. They look exactly 
like C code, but curly braces are required surrounding 
statement lists in structure statements. In other words, 
structure statements have the form 


if(. . .) {statement list} 

if(. . .) {statement list} else {statement list} 
while. . .) {statement list} 

do {statement list} while (. . .); 

for (.. .) {statement list} 

switch(. . .) {statement list} 


In my opinion, allowing curly braces to be optional is a 
big flaw in C. In this example: 


if (abc < 5) 
XVZ =-5; 
if (abc < 6) 
XVZ. ='G; 


the indentation is misleading and will probably cause a 
bug. This kind of error can be extremely difficult to find. 

Let’s see what code PL/68K’s structure statements pro- 
duce. In the accompanying tables, the dollar sign denotes 
code that corresponds to some language construct. For 
example, $ statement list $ stands for whatever code is 
generated for the statement list. The statement list could 
be arbitrarily complicated—for instance, it could contain 
nested structure statements. The notation 


$ Evaluate boolean. If false, jump to label1 $ 


indicates that code is generated for the Boolean expres- 
sion such that a jump to label1 is taken if the Boolean 
expression is false. Otherwise, control falls through to the 
following code. Labels are indicated in the usual way, by 
identifiers followed by colons. All generated labels are, of 
course, unique, even though they may have identical 
names in the tables. 

Table 9, page 32, shows the if statement. When an if 
statement contains no else clause, the Boolean expression 
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Syntax 


(1) while ( boolean ) { statement list } 
(2) while (1) { statement list } 


Code generated for (1) 


bra continue_label; 

label1: 

$ statement list $ 

continue_label: 

$ Evaluate boolean. If true, jump to label 1$ 
break_label: 


Code generated for (2) 


continue_label: 

$ statement list $ 
bra continue_label; 
break_label: 


Table 10: The while statement 


Syntax 


(1) do { statement list } while ( boolean ); 
(2) do { statement list } while(1); 

Code generated for (1) 
label 1: 


$ statement list $ 
continue_label: 


$ Evaluate boolean. If true, jump to label1$ 
break_label: 


Code generated for (2) 


continue_label: 

$ statement list $ 
bra continue_label; 
break_label: 


Table 11: The do statement 


Syntax 


(1) for ( assignment list 1; boolean, assignment list 2) 

{ statement list } 
(2) for ( assignment list 1; ; assignment list 2) { statement list } 
(3) for ( assignment list 1; 1, assignment list 2) { statement list } 


Code generated for (1) 


$ assignment list 1$ 

bra labelO; 

label1: 

$ statement list $ 

continue_label: 

$ assignment list 2$ 

labelO: 

$ Evaluate boolean. If true, jump to label1 $ 
break_label: 


Code generated for (2) or (3) 


$ assignment list 1$ 
label 1: 

$ statement list $ 
continue_label: 

$ assignment list 2$ 
bra label1; 
break__label: 


Table 12: The for statement 


34 





PL/68K 
(Continued from page 33) 


is evaluated, and control either falls through to the then 
clause or a jump is made to the end of the statement. 

Similar code is generated when the if statement con- 
tains an else clause. The Boolean expression is evaluated, 
and control either falls through to the then clause or a 
jump is made to the else clause. A BRA (branch always) 
instruction following the then clause skips around the 
else clause. 

The code generated for the while statement, shown in 
Table 10, page 34, might be a little controversial. The first 
instruction is a branch to the end of the loop so that the 
loop test occurs at the bottom. This produces the fastest 
code unless the while loop is executed less than once on 
average. In the rare cases in which this jump is unwant- 
ed, the programmer must simulate the loop in some way. 

Notice the labels called continue_label and break_label. 
These are used as target labels for the break and continue 
statements. In other words, within a while, do, or for 
statement, the effect of a continue instruction is to gener- 
ate a branch to the continue_label defined for that state- 
ment. Similarly, a break statement generates a jump to 
the appropriate break_label. As in C, you can also use the 
break statement inside a switch statement. 

The while statement generates different code if the 
Boolean expression is a nonzero constant. This is a com- 
mon idiom in C, and the definition of PL/68K ensures that 
there is no time penalty for using it. 

The code for the do statement, shown in Table 11, page 
34, is similar to the code produced by the while statement. 
The code for the for statement (see Table 12, page 34) is 
more interesting. If the loop test in a for statement is non- 
trivial, the code for it appears at the bottom of the loop. 
Note also that the syntax of the for statement is more 
restricted than in C. 

The switch statement, shown in Table 13, page 37, gen- 
erates a jump table—i.e., a table of addresses. Code is gen- 
erated that jumps through that table to the proper case 
statement, based on the contents of a register. Note that 
the switch statement destroys this register. 

It is sometimes better to generate a sequence of tests 
rather than a table jump, but the case statement always 
generates a table jump. Remember, each language con- 
struct in PL/68K stands for a particular sequence of 
code—if you want a sequence of tests, use a sequence of if 
statements; if you want a table jump, use a switch state- 
ment. 

Many compilers generate jumps to jumps when they 
translate structure statements, but the definition of PL/ 
68K requires that all jumps to jumps (and jumps to return 
statements) be eliminated. The assembler can do this in 
several ways. For instance, if the assembler creates a 
parse tree for an entire function before any code is gen- 
erated, it’s easy for the code generator to look at the tar- 
get of any jump to see if it is another jump or a return 
instruction. Alternatively, the assembler can use a stan- 
dard peephole optimizer. 


Function Calls 
Functions in PL/68K can have formal parameters and lc 
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cal arguments, just as in C. The code shown in Table 14, 
page 37, is generated by function calls. Code is generated 
to push all arguments on the stack, a JSR (jump to subrou- 
tine) instruction is generated, and, if necessary, an ADD 
instruction is generated to pop arguments off the stack. 
One long word is always reserved on the stack for the 
first argument, which shortens the calling sequence 
when there are less than two arguments. 

The ADD instruction can be eliminated by having the 
called program, instead of the calling program, pop the 
arguments off the stack, but the sequence shown in Table 
14 is the fastest. If you eliminated the ADD instruction and 
pushed the arguments in the same way (that is, above the 
return address), the called program would need to do 
much more work to pop off its arguments. You could also 
push the actual arguments below the return address, but 
that way actually increases the length of the calling se- 
quence. In order to push arguments below the return 
address, you would have to use an instruction such as 
move arg,n(sp), which is 2 bytes longer than move 
arg, —(sp). 

Unlike standard C, PL/68K does specify the order in 
which arguments are pushed, namely in reverse order. 
Thus, a function that takes a variable number of argu- 
ments—printfl ) for instance—will find its first argument 
on the top of the stack. 

Of course, it is often best to pass arguments in registers, 
but PL/68K doesn't need a separate mechanism to do this. 
Suppose you have a function called g( ) whose two argu- 
ments are passed on the stack. To change g( ) so that it 
will take its arguments in registers, you just define the 
following macro 


#define g(a,b)d0=a; d1=b; g11 ) 
and change g’s name to g1. Notice that a statement such as 


if (.. .) g(x,y); 


cannot cause problems in PL/68K because you must 
write 


if (. . .) {g(x,y);} 


instead. (If braces were omitted, after macro expansion, 
the code would be 


if (.. .) d0=a;d1=b;g11 ); 


and only the assignment d0=a would be part of the if 
statement.) 

This macro might generate redundant code. Suppose it 
were called with dO as the first argument, for instance. 
The macro would expand to dO=dO and generate the in- 
struction move d0,d0. To handle that problem, the PL/ 
68K assembler eliminates redundant moves. If you must 


| generate such a redundant move for some reason, use a 


pseudofunction. Pseudofunctions are never second- 


' guessed by the assembler. 
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_ Syntax 


_ switch (reg) { 
- case constant 1: statement list 1; 
- case constant 2: statement list 2; 


case constantn: statement listn: 
default: default statement list ; 


} 


Code generated 


if (reg < min|| reg > max) { 
goto default_label:; 
} 


else { 
$ goto the routine whose address is at table [reg] $ 


table: 
dc.| label imin; 
dc.| label imin+ 1; 


dc.!| label imax-min+13 


label1: 

$ statement list 1$ 
label 2: 

$ statement list 2$ 
label n: 

$ statement listn$ 
default_label: 


$ default statement list $ 
break_label: 





Table 13: The switch statement 








No arguments 
jsr function 












One argument 
move. arg, (Sp) 
jsr function 










Two or more arguments 
move argp, (Sp) 
move arQn-1,—(SP) 


move argo, —(sp) 

move arg;:,—(sp) 

jsr function 

add # size of all arguments except argn, Sp 


Table 14: Code generated for function calls 


Entry 
movem.| aj//_local_registers , —(sp) 
link a,, # — size of local auto variables — 4 


Exit 
unlk Aan 
movem.| (sp)+, a/l_local_registers 
rts 


Table 15: Code generated for entry/exit of An-based 
functions 
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Accessing Variables Within Functions 

Now that I've covered the passing of arguments to a func- 
tion, I'll explain how the function gets hold of those argu- 
ments. This is a complicated subject, so before getting in- 
volved in some messy details, let’s handle the easy cases. 

First, PL/68K keeps its hands off all registers declared 
outside any function. These global registers can be ac- 
cessed from within functions, but PL/68K never gener- 
ates code to save or restore them. Consequently, you can 
prevent PL/68K from interfering with any register sim- 
ply by declaring that register outside a function. By the 
way, the register keyword is not valid outside functions, 
but that does not prevent you from declaring register 
variables anywhere you wish, either in C or in PL/68K. 
For instance, you can declare a0 to be global simply by 
saying char * a0; outside any function. 

Second, except for these global registers, all registers 
used in a function are saved on entry and restored on exit 
from the function. The assembler uses the MOVEM.L 
(move multiple register, long) instruction for this pur- 
pose. Accessing register variables declared in a function 
is, of course, easy. 

Third, if a local variable is declared to be static, memo- 
ry is allocated to that variable in static memory, not on 
the stack. No extra code is needed to access that variable, 
either on function entry or exit. 

Static internal variables are not very useful; because 
the values of static internals are retained between invo- 
cations of a function, static internals are destroyed by re- 
cursive function calls. Also, on many machines (including 
the 68000) accessing a variable in static memory is more 
expensive than accessing a “‘local auto” variable—that is, 
a local stack variable. At any rate, generating code for 
static internal variables is straightforward and is not af- 
fected by the following complications. 

Functions need to access two kinds of nonregister vari- 
ables: formal parameters and local auto variables. Both 
types are allocated on the stack. You have three choices 











If one or more functions called within this function 








Entry 
movem.| a//_local_registers , —(sp) 
suba # size of local auto variables + 4, sp 
Exit 7 
adda # size of local auto variables + 4, sp 
movem.| (sp)+,a/l_local_registers _ 
rts 





If no function called within this function 





Entry 
movem.| a/l_local_registers , —(sp) 









Exit 
movem.| (sp)+, all_local_registers 
rts 






Table 16: Code generated for entry/exit of sp-based 
functions 
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for how PL/68K generates code for these stack variables. 
You make your choice using one of three pseudofunc- 
tions: base(An), base(sp), or nobase( ). If none of these 
appears in a function, the default is base(sp). 

First, you can have PL/68K access stack variables via an 
address register that is different from the stack pointer, 
as shown in Table 15, page 37. If the base(An) pseudo- 
function appears anywhere in the function (where An is 
any address register except the stack pointer, a7), PL/68K 
generates a LINK (link and allocate) instruction on func- 
tion entry and an UNLK instruction on function exit. All 
stack variables are accessed via the address register 
named in the base(An) pseudofunction. 

Second, you can have PL/68K access stack variables via 
the stack pointer, as shown in Table 16, page 38. The as- 
sembler generates this kind of code if the base(a7) or ba- 
se(sp) pseudofunction appears anywhere in the func- 
tion. The code generated for sp-based functions is more 
complicated, but more efficient, than that for An-based 
functions. If an sp-based function contains no function 
calls, the stack pointer is not incremented on function 
entry and local auto variables are accessed using positive 
offsets from the stack pointer. If the function does con- 
tain other function calls, however, space is reserved for 


local auto variables by incrementing the stack pointer on 


function entry, and local auto variables are accessed us- 
ing negative offsets from the stack pointer. 

Third, you can access stack variables by hand. If the 
no_base( ) pseudofunction occurs anywhere in the func- 
tion, no code is generated on function entry or exit, decla- 
rations of stack variables are ignored, and no explicit ref- 
erences to stack variables are permitted. The no_base( ) 
pseudofunction is useful when you must play some kind 
of game with the stack. 

Sp-based functions are somewhat dangerous. If the 
stack pointer is changed using a pseudofunction, the off- 
sets used to access stack variables are going to get out of 
sync. To handle this problem, several pseudofunctions, 
shown in Table 17, page 38, allow you to indicate that the 
offsets should be changed. 

The push(arg) and pop(arg) pseudofunctions are equiv- 
alent to the move(arg,*——sp) and move(*sp+ +,arg) 
pseudofunctions, but in addition, they tell the PL/68K as- 
sembler to adjust the offsets used to access stack variables 
in sp-based functions. The addsp(n) and subsp(n) pseudo- 
functions are equivalent to the addi(n,sp) and subi(n,sp) 
pseudofunctions, but again they tell the assembler to ad- 
just offsets. Finally, the adjsp(n) pseudofunction gener- 
ates no code but tells the assembler to adjust the offsets. 





Pseudofunction 






base(a,) use a, basing for stack variables 











base(sp) use sp basing for stack variables 

nobase( ) access all stack variables ‘“‘by hand”’ 
push(arg) move arg, —(sp) and adjust stack offsets 
pop(arg) move(sp)+,arg and adjust stack offsets 
addsp(n) adda #n, sp and adjust stack offsets 
subsp(n) suba #n, sp and adjust stack offsets 
adjsp(n) adjust stack offsets 













Table 17: Pseudofunctions for stack operations 
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Software, 1985. 
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gineers, writers and programmers who demand 
the most powerful text editing software. 

Expect more from VEDIT PLUS. It’s available 
for all MS-DOS, PCDOS, CP/M-86 and CP/M-80 
computers. List price $225. Educational / corpo- 
rate site licensing and current user discounts 
available. 


VEDIT and CompuView are registered trademarks of CompuView Products. Inc. 
WordStar is a registered trademark of MicroPro, International 

dBASE is a registered trademark of Ashton late. 
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VEDIT PLUS FEATURES 


e Simultaneously edit up to 37 files of unlimited size. Do ‘cut 
and paste’ operations, edit text or develop macros. 

e ‘Virtual’ disk buffering simplifies editing of large files. 

e Memory management supports up to 640K 

e MS-DOS, PCDOS pathname and CP/M user number support. 

e Horizontal scrolling (edit spreadsheets easily). 

e Customization - determine your own keyboard layout, sup- 
port any screen size, any computer, any CRT terminal 


EASY TO USE 


e Interactive on-line help. Create your own on-line help with 
menus for compilers, style guides, non-computer subjects. 

e On-Line integer algebraic calculator. 

e ‘Undo’ command. 

e Single key search and selective replace. Search with wild 
cards and pattern matching. 

e Keystroke macros - create your own on-line editing functions. 

e Print any portion of text or file. 

e Excellent indexed documentation. Includes new tutorial. 

e Highly optimized for IBM PC, PC XT or PC AT. 


PROGRAM DEVELOPMENT 


e Automatic Indent/Undent for 'C’, PL/I or PASCAL. 

e Conditional lower to upper case conversion. Change at’; or 
other character. 

e Optional 8080 to 8086 source code translator macro. 


WORD PROCESSING 


e Word wrap and paragraph formatting at adjustable margins. 
e Right margin justification. 
e Recognizes graphic, foreign and special character sets. 


MACRO PROGRAMMING LANGUAGE 


e ‘IF-THEN-ELSE’, looping, conditional branching, user 
prompts, keyboard input, algebraic expressions and vari- 
ables. 

e Simplifies complex text processing, formatting, conversions 
and translations. 

eEdit multiple files automatically - perform numerous 
search/replace in several files without user intervention. 

e Complete TECO capability. 

e Free Macros: e Compare two files and merge work done by 
two people e Sort mailing lists e Print formatter e Replace 

command prompt with an easy to use menu. 


CompuView 


Circle no. 122 on reader service card. 1955 Pauline Blvd., Ann Arbor, MI 48103 (313) 996-1299, TELEX 701821 





PL/68K 
(Continued from page 38) 


These pseudofunctions have no effect on An-based func- 
tions. 


Summary 

To summarize the strengths and weaknesses of PL/68K, 
the syntactical restrictions that make PL/68K a strict sub- 
set of C are listed as follows: 


¢ All operand/operator combinations must correspond to 
an instruction in the 68000 instruction set. 

¢ Functions neither have types nor return values. 

¢ The array operator / / is eliminated, but arrays may be 
declared. 

- Assignment statements are severely restricted. 

* Statement lists must be surrounded by curly brackets. 
¢There are no floating points, or double constants, or 
operators. 


There are no additions or changes to C syntax. PL/68K 
and assembly language are semantically identical; the ad- 
vantages of PL/68K over assembly language are all syn- 
tactical: 


*C syntax makes programs easier to read. 
*C syntax eliminates many common coding errors. 
¢ Far fewer visible labels are required. 


PL/68K is not the successor to C nor is it superior to C 
for most programming projects. The advantages of PL/ 
68K over C apply only in limited circumstances, but 
when performance is paramount, PL/68K stands out: 


¢ All machine resources and instructions are available. 
* Global allocation of registers is possible. 

* Total control over generated code is possible. 

¢ Generated code is smaller and faster. 


Figure 2, page 42, shows the relationship between PL/ 
68K and its two parent languages. PL/68K is only a subset 











of C; not all of C is included. On the other hand, C must be 
augmented by the ops library in order to simulate all the 
machine resources of assembly language. 

Listing One, page 101, shows an example of a PL/68K 
function. This function finds a name in a symbol table 
and returns information about that name in registers. 
Listing Two, page 101, shows the code generated by the 
PL/68K assembler for that function. 


Conclusion 

PL/68K started life as a C-like assembly language for the 
68000 chip. High-level assemblers are not new—a paper 
by Niklaus Wirth Journal ACM 15, January 1, 1968) de- 
scribed a high-level assembly language for IBM 360 
machines. 

My early thinking about PL/68K was influenced by 
Wirth’s paper and by the register allocation and code se- 
lection principles. At that stage, I was interested in using 
compiler technology to create better assemblers. I saw no 
particular reason to make PL/68K a subset of C. 

I felt dissatisfied with the initial version of PL/68K: it 
was doomed to be “just another computer language. " Not 
wanting to add another minor dialect to the Babel of 
computer languages, I decided to make PL/68K’s syntax 
identical to C’s. This was a lucky decision. 

From the first, PL/68K had to be able to name all ma- 
chine resources, including machine instructions and as- 


_ sembly-language pseudo-ops. Early versions of the lan- 


guage allowed ‘‘raw”’ lines of assembly code to be 
interspersed with C-like lines of code. Although this ap- 
proach had some merit, my decision to make PL/68K’s 
syntax compatible with C convinced me to use functional 
notation to represent assembly-language features. This 
change was also fortunate. 

I began to speculate about what would happen if a PL/ 
68K program were compiled with a C compiler. I asked 
myself, suppose the program produced by the C compil- 
er and the program produced by the PL/68K assembler 
were semantically equivalent? Suddenly, PL/68K_ be- 
came not just another assembly language but a new way 
of using C. 

The principle of semantic equivalence guided a rede- 


The same code may be run through two different translators. 


Figure 1 


40 


_ ce ee ea a i nn ESE. 





Standard > 
C Library 


PL/68Kfyk 
Library 





Dr. Dobb's Journal, January 1986 











KADY Speaks 
your Language 


We can help you buff up your BASIC...Put a finish on your FORTH... 
Conquer C or COBOL...Learn how to LISP... Succeed with Assembler... 
And more! Just call toll-free or use the coupon to order today! 





ADSL 


ne, 


A Language and Been 
for Solving 
Mee 


batt a eke o6co Dee 


role et tcuy cee ce eRe a 
Ott, Copel eee cane teers 





1. PC magazine calls it: “A truly 2. A step-by-step tutorial for 3. The FORTH authority, Leo 4. The best C articles from the 
remarkable book...A treasure the high-level, stack-oriented Brodie, illustrates the elegant highly respected Dr. Dobb's 
trove of useful programming infor- FORTH-83 standard. $17.95 logic behind FORTH and shows Journal dealing exclusively with 


mation for the IBM PC.” $22.95 


how to apply specific problem- 
solving tools to software. $15.95 


C language and programming 
techniques. $24.95 


Creating Utilities 
be fit) rome Ae Bete 
10 Best for the IBM PC & XT 





5. The only book of its kind to 6. A new guide to LISP (List 7. For the more advanced user 8. The definitive desktop reference 
focus on the differences between Processor), the much-talked- familiar with Assembly language, for anyone using the C language— 
micro and mainframe COBOL— about language of artificial here’s an opportunity to unleash a virtual clearinghouse for C 

and that includes invaluable, fully intelligence. $14.95 the power of 10 DOS-enhancing language information. $19.95 
coded COBOL programs for the programs. $19.95 

IBM PC. $19.95 


Circle no. 219 on reader service card. 


Now at your book or computer store. a4 2 In New Jersey: 
Or order toll-free today: rt we 800-624-0024 
r (Brad COMMUNICATIONS COMPANY, INC. Acc’ 


MMUNICATIONS COMPANY, INC. Acc't # Exp: date. 
c/o Prentice Hall, 




















| P.O. Box 512, W. Nyack, NY 10994 at 
ame 
i Circle the numbers of the titles you want below. i 
(Payment must be enclosed; or, use your charge | Address 
card.) Add $1.50 for postage and handling. City State Zip ! 
Enclosed is check for $ or charge to (New Jersey residents, please add applicable sales tax.) 
[_] MasterCard [] VISA. Dept. 3 G-LDDJ-AE(1) | 
1 (0-89303-510-6) 2 (0-89303-660-9) 3 (0-13-917568-7) 4 (0-89303-599-8) 
5 (0-8359-3051-3) 6 (0-13-527813-9) 7 (0-89303-584-X) 8 (0-89303-365-0) _ 









GRAF 30 


the complete 


BUSINESS and SCIENTIFIC 


printer graphics program 


$49 95 


CP/M-80 


569% 


MS-DOS / PC-DOS 





@display floating point data directly 
from spreadsheets, data bases, 
word processors, and 
programming languages (or the 
keyboard) in a wide variety of 
bar, pie, line, and scatter plots 





@ plot and group up to 6 different 
variables on a single graph, 
distinguished by up to 14 
different fill-in patterns and 8 
different point-plotting symbols 

@add up to 5 different-density grid 
lines, and choose from a wide 
variety of numerical labeling 
options 










@menu driven operation supports 
automatic graph scaling, labeling, 
and legend creation 









Production Costs 












J 12.50 
a 
e ‘ 
‘ co « 
n iF Desc 
e 10 oo POs SHEL Opie we hue © wikele wie ¢ poble Wis peels 6 bcacata dle -— & 5 6 IVE te @ Gxt et Gia ere w ahy °° 
S OOS) f P oe 
|e x) Oe 
e Od ~° OO 
a o.4 ee) . 
Y Ded OC) ed oe 
m, . Fak... teeroierivis di MOYES, slo0sh soatsneas eet Ecos BS |. eee 2 i. 
n “o OC) 2. Od 
2° aed 6% %? <x 
eS 2 <5 5) Sd ‘oe 
be 5d ove CSC) a eS<9 
oe xX St DC 
eo: oe OS) oe 
oa |... PO L$. ee. POS 
so + ays RCL SS Re DoS BRS BOC 
: e 
Po o6 be) 4 





0) 






0 
© 
A) 
e 





0 
o 
L 





a 
xX 





ia Labor Sy Material 


GRAF 2.0 Update Policy: Returning your original GRAF 2.0 disk to MSC entitles you to $20.00 off the 
above prices. 






TERMS; We ship via first class mail, The above prices include domestic shipping and handling. Orders outside 
USA require additional $5.00 for postage. N.Y. residents add state sales tax. When ordering you MUST state your 
computer and printer make and model. We support MS-DOS (PC-DOS) version 2.0 or later on computers with at 
least 192k RAM, and CP/M-80 version 2.2 or later on Z80 computers (other than modified Apples) supporting a 
TPA of at least 54k (requires 64k of RAM). Most soft-sector disk formats are available. (If you can read several 
formats. please send us a list.) GRAF 3.0 works with any printer fully Compatible with one of the following: Epson 
FX, RX, LX. MX (with GRAFTRAX), or LQ-1500; C. Itoh Prowriter: NEC 8023A: Star Micronics Gemini 10X, 15X, 
SG-10. SG-15; IBM Graphics Printer; Okidata 192, and earlier Okidata models equipped with the “IBM Plug ‘n’ 
Play” chips. (If you have an Okidata printer, other than the 192. the Plug ‘n’ Plav chips are required") 


Microcomputer 
——— MSC 


Systems 
27 Forest Avenue 













Consultants 


New York 11776-1820 






Port Jefferson Station 









Circle no. 136 on reader service card. 


Programming the 


65816 Microprocessor 
Including 6502 and 65C02 


David Eyes 


42 Circle ne. 202 on reader service card. 














PL/68K 
(Continued from page 40) 





sign of the language; any construct that violated this prin- 
ciple had to go. In addition, I invented the ops library so 
that C programs could simulate 68000 machine instruc- 
tions. Along with the ops library, the concept of pseudo- 
functions was born, and the language was complete. 

PL/68K allows me to sidestep a question that has been 
haunting me ever since | started programming—wheth- 
er to program in assembly language and accept the re- 
sulting inconveniences or to program in a high-level lan- 
guage and accept a final product that is larger and slower 
than it could be. PL/68K solves that dilemma. 

You can design and write a program in C, keeping in 
mind the possibility that you will convert it to PL/68K 
eventually. You can write difficult parts of the program, 
or parts of the program that will not appear in the final 
version, using all of C’s features. After you have de- 
bugged the C program, you can produce a PL/68K ver- 
sion of the program, if desired, by rewriting or excluding 
those parts of the program that use full C. You then test 
the PL/68K version and improve its performance as 
much as you require. 

PL/68K hits precisely the right level of abstraction for 
systems programming. All the features of C allow you to 
design and code programs easily, but when you need to 
do low-level work, nothing stands in your way. 

A final thought—you could transfer most of the syntax 
and all the design rules of PL/68K to a similar language 
for other machines. In this limited sense, PL/68K is a ma- 
chine-independent assembly language—PL/68K pro- 
grams are much more portable than programs written in 
traditional assembly language. 


The relationship between PL/68K, 
C and assembly language. 


Some features of 
C are not present 
in PL/68K. 


Features of C 
corresponding to 
assembly language 


Pseudofunctions 
simulate assembly 
language features 
not found in C. 





Figure 2 
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Note 


A compiler for the PL/68K language is available from the 
author. 


Appendix: Why Expressions Are Restricted 
in PL/68K 

The outline of the argument is as follows. The register 
allocation rule conflicts with C’s precedence rules (which 
govern the order in which operators are applied) and C's 
rules for converting operands from one type to another 
(known as the ‘‘usual arithmetic conversions” in the C Ref- 
erence Manual). Thus, by the principle of semantic equiva- 
lence, all constructions in PL/68K that involve C’s prece- 
dence and type conversion rules must be eliminated. 

Consider a typical C expression, such as a = (b *c) + (d 
* e);. The register allocation rule says that this expression 
must be evaluated in location a, but that is not possible. At 
least two separate locations are required—one to hold 
the subexpression (b * c) and another to hold (d * e). In 
general, any expression involving parentheses may re- 
quire more than one location to evaluate. 

The only way to make a single location suffice for the 
evaluation of all expressions is to require left-to-right (or 
right-to-left) evaluation of operators. Alas, this changes 
the precedence of operators, except in cases such as a = 
Id *c + c;, which is evaluated left to right in C anyway. 

Even such limited expressions cannot be allowed, 
though. C’s rules for type conversions state that conver- 
sions are made during the evaluation of the right-hand 
side of the expression. Only after the right side is com- 
pletely evaluated does the assignment take place. PL/68K 
has only one place to make those conversions, howev- 
er—the left-hand side of the expression. The operands 
themselves cannot be converted because that would 
change their value. Thus, only one operand can be con- 
verted and only one operand can be allowed on the right 
side of an assignment statement. 
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NEC’s newest microprocessor, the V-20. The V-20/30 chip replaces your PC 
resident 8088 or 8086 microprocessor chip, thereby providing 8 bit processing 
ability and actually improving it’s 16 bit performance by up to 50%. If your PC is 
not already equipped with the NEC V-20 there is no problem. Simply purchase our 
MICRUN/CPM software package, and we will provide you with the V-20 chip for 
only $45 dollars. 








Features 


* Incredibly fast-up to 8 MHz * Includes disk transfer utility for 

* Ability to run CPM programs reading, writing, and formatting up 
in color to 70 different CP/M and MS-DOS 

* Cross sub-directory operations disks. 

* No expensive co-processor * 16 logical/physical drives 
board req. * Includes RS232 communications 

* Not an emulator program for transferring software to 

or from CPM system to PC. 


Supports 


Osborne*Kaypro*Zenith H-19*Televideo*Radio Shack* ADM3A*VT-52* 
Visual 210 adds Viewpoint* Hazeltine Espirit & 1510* Plus many more 


ONLY $99.95 


Included in the above price: Interface software, disk transfer utility program, 
RS232 communications program, complete documentation. Not included is the 
NEC V-20 microprocessor chip which is available at a price of only $45 dollars. 


Cj 1-800-637-7226 


Orders only. 
Micro Interfaces Corporation 
6824 N.W. 169th Street 
Hialeah, Florida 33015 
(305) 823-8088 





Dealer Inquiries Invited 
Trademarks: CP/M (Digital Research, Inc.), IBM (1BM Corp.), 
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been involved in a Gevelop. 
ment project that requires a simple, 
fast, clean 32-bit microprocessor oper- | 
ating system. After a great deal of re- 
search, 
commercial system that met our 


stringent requirements of extremely | 


fast response time (even under a load 
of 20 users), low price (less than | 
$10,000 for both system and soft- 
ware), compact code size (we wanted 


ity routines discussed in this article, 
that required less than 20K of object 
code), and simple programming of 
applications. After some brainstorm- 
ing, we created a 68000 multitasking 
kernel that met and even exceeded 
our expectations of speed and com- 
pactness. Released from hardware re- 
quirements by our decision to write 
the kernel ourselves, we decided to 
use the VMEbus hardware configura- 
tion because of its standardization, 
complete hardware specification, rel- 
atively low price, ease of expansion, 
and the availability of lots of high- 
speed hardware devices. We were 
also impressed by the reliability and 
ease of use of the Eurocard connec- 
tors used with the VMEbus. 


Why Not Use an Existing OS? 
Our requirements for speed and 
compactness stemmed primarily 
from the need to handle a large num- 
ber of I/O tasks over serial lines with- 


rt LP Set ei se 
Nicholas Turner, 10 McGranahan 
Court, Boulder Creek, CA 95006, (408) 
338-9510 


4G. 





we were unable to find a | 


: | Bee is to be done. 


a system kernel, including all the util- | 





by Nicholas Turner 


or the past year, we at Terra . 
| Nova Communications have S 


_ This is Sonnets for 
a system on which a 
lot of assembly-lan- 
- guage development 


out incurring large overheads for in- 
terrupt handling, disk access, and 
context switching—that is, we need- 
ed to be able to do significant 
amounts of I/O without slowing the 
system. Our kernel should eventual- 
ly be able to handle 20 real-time us- 
ers over serial lines at 1,200 bps, in- 
cluding full-speed block transfers, 
with no perceptible response-time 
delay and only minor slowing of the 
byte-transfer rates. We needed a sys- 
tem that would degrade gracefully; 
rather than pausing in midstream as 
one task takes over the system for an 
appreciable fraction of a second or as 
tasks are paged in and out, it should 
slow down gradually as the load in- 
creases, always providing steady and 
uniform output, even if it’s at a re- 
duced byte transfer rate. None of the 
commercial systems we examined 
had this property, nor were they 
able to handle the load required 
without significant degradation. 
Examination of the code used in 
several of the commercial kernels 
we sampled showed some interest- 













ing reasons for this: Most kernels 
contained code designed to handle 
all sorts of unlikely circumstances 
that might arise in an environment 
where you don’t know what sorts of 
programs might be running. Not 
only did this code add significantly to 
the size of the kernel but it also 
slowed down the process of context 
switching between tasks in many 
cases. We needed the fastest possible 
context switch in order to guarantee 
that minimum system time was 
spent on this. Fortunately, we knew 
exactly which applications would be 
running on our system, and we were 
able to design a complete applica- 
tion/system interface to make appli- 
cation coding easy. Because we knew 
that all application code running un- 
der our kernel would be “polite” 
(would follow all the rules of the in- 
teraction between application and 
kernel) and that all source code 
would be available for debugging, 
we were able to dispense with a lot 
of the error-handling code usually 
present in commercial kernels. 

We discovered that another con- 
tributing factor to the time required 
for a context switch was the magni- 
tude of the context that was 
switched. In most of the systems we 
examined, all the machine registers 
were saved and restored, and full sta- 
tus information was saved, both of 
which took up a significant amount 
of processing time. As we’ll explain 
later, we fixed this in a rather unor- 
thodox way. 

Further, many commercial ker- 
nels required the use of a memory 
manager chip and spent significant 
amounts of time paging users in and 
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out to compensate for a small system 
memory. We opted against memory 
management, mainly because it 
solved no problems for us. We didn't 
need any sort of memory protection; 
in fact, one of the most important cri- 
teria was that all tasks must be able to 
quickly read and write data belong- 
ing to any other task or to the system 
itself. Also, our memory require- 
ments were not large (minimum 
512K, expandable to several mega- 
bytes) and because of the amount of 
code sharing between tasks, the 
structure of our data heap, and the 
heap’s interaction with the disk sys- 
tem, there was no need for hard- 
ware paging of memory. 


Why Program the Kernel in 
Assembly? 
It was clear from the start that, in or- 
der to get the kind of performance 
we wanted from the system, the in- 
ner kernel had to be written in na- 
tive code. Even compiled C or Forth 
would have had to be manually 
‘tuned’ in assembly source code 
form. Further, we could see several 
difficulties with compiled lan- 
guage—we needed to do so many 
“tricky” things to extract the last few 
cycles from the system kernel that 
writing it in compiled code was out 
of the question. By putting the entire 
kernel in machine code, we simpli- 
fied the effort required to make ma- 
jor changes (it’s all in the same lan- 
guage) and made possible a far more 
complete and integrated tuning. 
Eventually we expect to put up at 
least a C compiler and a Forth inter- 
preter for faster development, but for 
the moment all development is in as- 
sembly for speed and compactness. 
Because assembly was the language 
of choice, selection of the target pro- 
cessor was the next important issue. 


Why Use the 68000? 

The eventual goal of our project is to 
provide a responsive telephone dial- 
up system that is able to support up to 
30 or 40 simultaneous calls without 
significant performance degradation. 
Such a task requires a truly powerful 
processor, even if the whole system is 
written entirely in native code. For 
several reasons, we have chosen the 
68000 family of processors for our 
base hardware. The most important 
reason is that the instruction set is ex- 
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tremely versatile and powerful. It is 
in many ways a true 32-bit instruction 
set, although, unless you are using a 
68020, you must put up with slightly 
slower memory access for 32-bit 
reads and writes because of the 16-bit 
data path. 

The instruction set for the 68000 
family is nearly orthogonal—that is, 
almost every instruction can be used 
with any of the 12 addressing modes. 
This is important for a system on 
which a lot of assembly-language de- 
velopment work is to be done be- 
cause the programs become much 
easier to generate, read, and debug. 
Unfortunately, even the 68000 is not 
perfect. Several times we've encoun- 
tered annoying restrictions—for ex- 
ample, we've often cursed our inabil- 
ity to do a PC-relative store. 

The 68000 also has another advan- 
tage for assembly-language program- 
mers: The memory architecture in 
its native mode, without the extras 
added by a memory management 
chip, is perfectly flat. That is, the ad- 
dress space is completely continuous 
from $00 0000 all the way to $FF 
FFFF—or $FFFF FFFF if you have a 
68020. For an assembly hacker, this is 
far more desirable than the segment- 
ed architecture required with the 
Z8000 or 80286 or with any 8- or 16- 
bit processor. For people writing in a 
high-level language, this is not an is- 
sue because they never deal directly 
with the memory at all. But for us, 
it’s nice to be able to chop up that big 
address space in any way we like. As 
I'll explain later in this article, we 
have chosen to make it into an enor- 
mous heap and virtual disk area, 
thus making the fullest possible use 
of each and every byte. 

Finally, after it became clear that 
the VME hardware bus was the best 
bet for our needs, the 68000 proces- 
sor family was the logical choice be- 
cause of the large number of 68000- 
oriented products available for the 
VME architecture. 

In this article I'll describe briefly 
how our operating system fits to- 
gether, and then I'll get to the fun 
stuff: the tricks and shortcuts we 
used to get such incredible perfor- 
mance out of the 68010 in our system. 
If you are already familiar with how 
a multitasking operating system fits 
together, you might want to skim 
down to the tricks and shortcuts. 











Number One 
in Performance 


68010/68000 


Coprocessor for 
IBM/AT/XT/PC- 
8/10/12.5mz No Wait States 


$4295 ary. 1 


FEATURES 
e 1-2 MB RAM (1MB Standard) 
e 16K-64K EPROM 
e 2-8 Serial Ports 
Async/Sync/Bisync Communications 
e Battery-backed Real Time Clock 
e Battery-backed 2K-8K RAM 
e 2 Parallel Ports 
e 68881 Math Coprocessor 
e Memory-mapped Dual-port BUS 
e 3-9 Users Per Board (3 Standard) 
e Up To 16 Boards Per AT/XT/PC 
e Can Operate As Standalone Processor 
SOFTWARE 
e 0S9 (Powerful UNIX-like Multi-user 0S) 
@ CPM/68K 
e Software selectable OS including concurrent 
PC DOS/0S-9 or CPM/68K operation 
e Support Module for IBM Graphics 
e High-speed Local/Global Disk Caching 
e Basic, Pascal, Fortran, C, and COBOL 


IBM is a register wd lenerel; of international Business Machines 
Os 98" registered trademark of Microware Systems Corp /CPM/68K is a registered trademark of Digital Research Corp 
MK68000/ MK680 10 are rotated trademnay rks of Motorola /UNIX is a registered trademark of AT&T 


TLM Systems 


West: 4704 W. Jennifer, Suite 105, Fresno, CA 93711, 209/276-2345 
East: 67 Grandview, Pleasantville, NY 10570, 914/747-1450 
Distributor: Telemarketing Services, Inc. 

1897 Garden Ave., Eugene, OR 97403, 503/345-7395 
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One Text Processor Beats Pmate™ 





The New Pmate. 


No other PC/MS-DOS® text proc- 
essor lets you edit files at the same 
time that you’re compiling a pro- 
gram. Or, call up your editor while 
inside another applica- 
tion. Or, put long text 
processing jobs in the 
background and run 
other programs while 
they execute. 

No other text proces- 
sor offers you built-in 
macros that give you 
C and FORTRAN lan- 
guage-specific editing 
features. Brace match- 
ing. Movement, deletion, and copy 
by function. Keyword insertion. 
Error processing, and many more. 
Plus, since you get macro source 
code for all language-specific fea- 
tures, you can modify or add features 
as you wish. 

And, no other text processor lets 
you use 1-2-3°-like menus, mouse 
pop-up menus, command-driven 
operation, or any combination of the 
above. With Pmate’s 170-command 
macro language, you can program a 
single key to handle multiple com- 
mand sequences. Call up other 
macros or common statements. Pass 
arguments to macros. Or, set up your 





own personalized text processing 


system with all your favorite features. 


Plus, you get full DOS 2.x path- 


name support. 100 numeric variables. 


A number stack for 
storing intermediate 
results. Arithmetic and 
logical operations. Struc- 
tured control statements. 
As well as numerous 
string, text and document 
manipulation functions. 

And, of course, you 
get standard Pmate fea- 
tures such as full-screen 
single-key editing. Auto- 
matic disk buffering. Ten auxiliary 
buffers. Horizontal and vertical 
scrolling. A ‘‘garbage stack’’ buffer 
for retrieval of deleted text. 

Pmate is priced at $225 and is 
available for 8086-based micros run- 
ning MS-DOS. A custom version is 
available for the IBM® PC, TI Pro- 
fessional!’ Wang Professional™ 
and DEC Rainbow.™ 

Find out more about the new 
Pmate today! Call (800) 344-7200. 
In Massachusetts (617) 762-5030. 
Or, write. 

Phoenix Computer Products 
Corp., 320 Norwood Park South, 
Norwood, MA 02062 


PROGRAMMERS’ PFANTASIES™ 


BY 
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MULTITASKING OS 
(Continued from page 45) 


Memory Structure 

RAM memory is divided into two ar- 
eas: the system zone and the heap, as 
shown in Figure 1 (page 47). The sys- 
tem zone begins at memory address 
0 with the 68000 vector list and con- 
tinues up from there. It’s quite small 
and contains only a few data struc- 
tures. Figure 2 (page 47) diagrams the 
structure of the system zone. 

The 68000 vector list contains all 
the hardware vectors required for 
processing of interrupts and excep- 
tions. It requires $300 bytes. The data 
in the vector list is first set up by the 
initialization section and modified 
thereafter by the I/O manager as de- 
vice interrupts are added or deleted. 

Above the vector list is a small zone 
containing miscellaneous system 
variables and pointers. The time of 
day and date are kept here, along 
with pointers for the various linked 
lists maintained by the kernel, plus 
some other information that needs to 
be quickly accessible via absolute 
short addressing (the fastest way to 
get at a memory location from the 
68000). Several I/O devices also have 
data here, where it can be accessed 
by interrupt routines without the 
overhead of following pointers 
through memory. 

Following the system variable 
zone, we have a rather strange beast 
in today’s world: an old-fashioned 
jump table! This table contains more 
than 100 absolute-long address mode 
JMP instructions at the moment— 
hundreds more are planned. 

The next structure in the system 
zone is the task control buffer (TCB) 
table, which is an array of data struc- 
tures that are linked via pointers into 
several doubly linked lists. Each task 
is associated with one TCB in the TCB 
array. When a task releases control 
to the next task, the context switcher 
reads the pointer from the outgoing 
task’s TCB to get the address of the 
next task’s TCB. This prevents unnec- 
essary overhead while reading TCBs 
belonging to inactive tasks in the ar- 
ray because they are not part of the 
active task linked list. It also makes 
possible an extensible TCB array: If 
the primary array is full when an- 
other task is about to be spawned, the 
task manager can allocate a nonrelo- 
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Entire Memory Space 





Interrupt & Trap Vectors 








Figure 1: Basic organization of the 683000 memory space 





The System Zone 
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$00 0300 Pointers and Variables 
FEATURES 
enn nno0 ee pee Interrupt & Trap Vectors e High speed microprocessor 
controlled backup (68000) 
Figure 2: The system variables and arrays e Two channel interface 
The Heap | e Built in LAN channel 
(typical configuration) e Software control of most VCR 


functions including Fast Forward, 
Rewind, and auto backup using VCR 
timer capabilities 


e Economical VHS or Beta formats 


[JDeletions 
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BH Tata Items 
Inter-task Messages 
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MG Miscelianeous 


TLM Systems 


West: 4704 W. Jennifer, Suite 105, Fresno, CA 93711, 209/276-2345 
pent era ee Ciee et 10570, 914/747-1450 

e . istributor: Telemarketing Services, Inc. 

Figure 3: Typical structure of the heap 1897 Garden Ave.. Eugene, OR 97403, 503/345-7395 
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MULTITASKING OS 
(Continued from page 46) 


catable item in the heap and contin- 
ue the TCB array there. 

Another extensible array follows 
the TCB table: The master handle ar- 
ray contains handles to relocatable 
heap items. (A handle is the address of 
a pointer.) All accesses to relocatable 
heap items must be dereferenced (fol- 
lowed through the handle to the 
pointer to the actual heap item) be- 
fore a task can use the item. That 





way, if an item is relocated by the 
heap munger (see description of the 
heap munger, later) during its back- 
ground heap-optimization, any tasks 
that own the relocated item will still 
be able to find it because the heap 
munger always fixes the master han- 
dle so it is correct after moving a heap 
item. This master handle is often lo- 
cated in the master handle array, al- 
though it doesn't need to be. Wherev- 
er it is, though, it must be in a 
nonrelocatable place so that the heap 
munger can follow a pointer back 





Do you know where your bugs are 7 


This C programmer is finding his bugs the hard way ...one at a time. 
That's why it’s taking so long. But there’s an easier way. Use 


& 
PC—Lint 
PC—Lint* analyzes your C programs (one or many modules) and uncovers 
litches, bugs, quirks, and inconsistencies. It will catch subtle errors before 
ey catch you. PC—Lint resembles the Lint that runs on the UNIX* O.S., but 
with more features and some awareness of the 8086 environment. 


e Full K&R C 


¢ Supports Multiple Modules—finds incon- 
sistencies between declarations and use 
of functions and data across a set of 
modules comprising a program. 


© Compares function arguments with the 
associated parameters and complains if 
there is a mismatch or too many or too 
few arguments. 


® User-modifiable library description files for 
most major compilers. 


e All warning and information messages 
may be turned on and off globally or 
locally (via command line and comments) 
so that messages can be tailored to your 
programming style. 


¢ All command line information can be 
furnished indirectly via file(s) to automate 
testing. 


© Use it to check existing programs, 
programs about to be exported or im- 
ported, as a preliminary to compilation, or 
prior - scaling up to a larger memory 
model. 


e All one pass with an integrated pre- 
processor so it’s very fast. 


e Has numerous flags to support a wide 
variety of C’s, memory models, and 
programming styles. 


© Price: $139.00 MC, VISA 
(Includes shipping and handling) PA residents add 6% 


sales tax. Outside USA add $10.00 

e Runs under MS-DOS* 2.0 and up, with a 
minimum of 128Kb of memory. It will use 
all the memory available. 


Trademarks: PC—Lint (Gimpel Software), UNIX AT&T), 
MS-DOS (Microsoft). 


GCIMPEL SOFTWARE 


3207 Hogarth Lane ® Collegeville, PA 19426 
(215) 584-4261 
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from the heap item to its master 
handle. 

After the last master pointer is an 
end mark. At the next 32-byte bound- 
ary, the heap begins. 

The heap (Figure 3, page 47) takes 
up all the available RAM beyond the 
system zone. It is a single data struc- 
ture composed of chunks called 
items. Every single byte of the heap 
belongs to an item of one sort or an- 
other. An item can be a deletion, or it 
can contain actual information. Items 
that contain information can be allo- 
cated (owned by one or more tasks) or 
unallocated. Unallocated items can be 
purged by the heap munger (see later) 
if it needs to make more room for a 
memory request from a task. For 
speed and ease of programming, ev- 
ery single heap item begins and ends 
on a 32-byte boundary. 

Virtually all system information 
that doesn't have to be addressed ab- 
solutely is stored in the heap, in vari- 
ous heap items owned by the system 
kernel. In addition, the heap contains 
all executable code, including the 
system kernel itself, in chunks called 
code items. 

Each heap item contains a 32-byte 
heap header record, followed by zero 
or more 32-byte data blocks. The 
header record contains the informa- 
tion necessary for the heap manager 
and the heap munger to identify, 
move, and validate each item. The 
heap is organized, like much of the 
rest of the system, as a doubly linked 
list. As the heap munger scans 
through it, it follows the pointers for- 
ward or backward to verify that all is 
in order. If it finds anything that is not 
completely kosher, it immediately 
stops the system, takes over the sys- 
tem console, and enters the debugger 
with a descriptive error message. 
When a bug occurs, it is often the 
heap munger that detects the prob- 
lem (in the form of a messed-up heap 
header) before anything else 


happens. 


Division of Labor 
The kernel is divided into several dis- 
tinct blocks of code. They are of three 


| types: one-time routines (initializa- 
| tion), system calls (routines available 


from every task), and discrete tasks 
(self-contained programs that run un- 
der the context switcher, just as do 
application tasks). Some of the system 
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Call name 


Spawn 
Kill 
Suicide 


HeapGimme 
HeapDel 
FillZero 
GetMaster 


SendMsg 
Del1Msg 
DelMsgs 
TxtMsg 
GetMsg 
HandleMsg 


DevReq 
DevDemand 
DevRel 
PrToStd 
PrloMem 


GetCommand 


AddCmdTab 
DoCommand 
GetPSW 


MoveString 
GetLine 
PrLine 
Print 


CompString 


Random 
Sart 


Description 


(Task Manager Calls) 

Create a new task 

Destroy a task (by task number) 

Kill the calling task 

(Heap Manager Calls) 

Allocate an item in the heap 

Release (delete) a heap item 

Re-initialize a heap item 

Assign a master handle for an item 

(Message Manager Calls) 

Send a copy of a block of memory to another task 

Delete message from top of incoming queue 

Delete entire incoming message queue 

Send a message of type ““TEXT”’ 

Fetch next message in queue 

Analyze incoming message and handle if standard type 

(Character I/O Manager Calls) 

Request a character |/O channel 

Demand a character I/O channel (usually impolite) 

Release a character |/O channel 

Select this task’s standard character I/O device 

Select the MemPrt device (see text) 

(Text Manager Calls) 

Input a command line and parse it, passing control to the appropriate 
routine based on the command. 

Add a set of commands to the existing command set 

Parse and execute a command already stored in memory 

Input and encrypt a password (to be compared with an encrypted 
password from the user file) 

Move an ASCII string 

Input a line of ASCII text from the character I/O device 

Print an ASCII string on the character I/O device 

Print a line of text. The line is expected to immediately follow the JSR 
Print instruction. 

Compare two ASCII strings 

(Miscellaneous System Calls) 

What system would be complete without random numbers? 

Square root of 32-bit integer 


Table 1: Some of Terra Nova’s system calls 


TRAP-oriented calls 


Instruction 


TRAP 


MOVE.L 
MOVE.W 
MOVE.L 
(variable) 


Cycles used Description 
#n 38 call the system routine 
2(SP),A0 16 point to word argument 
(A0)+,D0 8 fetch the argument 
A0,2(SP) 16 update return address 

(variable) decode argument word 

useful code 
24 return to caller 


104 (+ decode) total cycles for overhead 


JSR-oriented calls 


Instruction Cycles used Description 
JSR Label.W 18 call low memory entry point 
JMP Label.L 12 call actual routine 
------ useful code 
RTS 16 return to caller 
46 total cycles for overhead 


Table 2: Comparison of TRAP- and JSR-oriented system calls 
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IBM/AT/XT/PC- 8mz 
No Wait States 


FEATURES 


© 64K-256K RAM 
e 2K-8K EPROM/Static Ram 
@ 2 Serial Ports 

Async/Sync/Bisync Communications 
@ Real Time Clock 
e Memory-mapped Dual-port BUS 
e On-board/Remote Reset NMi capability 
e Up To 32 Boards Per AT/XT/PC 
e Can Operate As Standalone Processor 
e Less Than Full Size Board 

(will fit other compatables.) 


SOFTWARE 


e ZP/Mtm CP/M Emulation Software 
(Supports Most CP/M Software) 

e Multiuser Capability if Used As A 
Slave Processor 


IBM is a registered trademark of intermational Business Machine 
CPM /80 ts a registered trademark of Digital Research Corp 


TLM Systems 


West: 4704 W. Jennifer, Suite 105, Fresno, CA 93711, 209/276-2345 
East: 67 Grandview, Pleasantville, NY 10570, 914/747-1450 
Distributor: Telemarketing Services. Inc. 

1897 Garden Ave., Eugene. OR 97403, 503/345-7395 
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9 TRACK TAPE CONTROLLERS 
AND %” TAPE SUBSYSTEMS 


MODEL TC-PC 


TC-PC is a high performance 9-track tape 
controller for the IBM-PC with these important 








A variety of software utilities is supplied as part 
of the TC-PC and TC-50 packages, including: 









features: e DEPOT (Data Exchange Program with Optional 
e Reads and writes industry standard 2-inch Translation) 
tape DEPOT provides a means to transfer data 






Compatible with most formatted tape drives between system disk and magnetic tape, 







e Standard 8-bit parallel recording with parity, allowing: 
and read-after-write verification — Data interchange from tape to disk, and 
e Switch selectable I/O address (four contiguous disk to tape 





ports required for operation) 
e Maximum data transfer rate of 192,000 bytes 
per second 
Record length from 1 to 65,535 bytes 
Supports up to 8 tape transports 
Jumper selectable DMA channel 
Modes: PE and NR2ZI at 800, 1600, 3200 and 
6250 bytes/inch 
Installable device drivers allow creation of 
application programs which run under IBM 
XENIX and MS-DOS 
e Operates with IBM-PC and -XT; Compaq 
Portable; Zenith PC-150; Sperry PC; the 
Leading Edge Computer, and other 100% 
IBM-PC compatible equipment. 


MODEL TC-50 

TC-50 offers all the standard features of the TC- 

PC with these additional enhancements: 

e Maximum data transfer rate of 400,000 
bytes/second; 904,000 bytes/second with 
memory option 

¢ Operation with a wider range of IBM- 
compatible machines, including |BM-AT; 
Compaq Desk Pro; ATT 6300 and others 


— Conversion from ASCII to EBCDIC, and vice 
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MULTITASKING OS 
(Continued from page 48) 


calls we've developed are listed in Ta- 
ble 1 (page 49). This is not intended to 
be a complete list, only to give some of 
the system's flavor. 

The initialization section is the 
block of code that gains control be- 
fore anything else happens. It starts 
with a brute-force approach: It grabs 
control from whatever operating sys- 
tem invokes it, and then it sets up the 
bare-bones data structures for the sys- 
tem. I'll go into greater detail about 
the initialization section later, when I 
talk about tricks and shortcuts. 

The most important low-level code 
segment is the context switcher, 
which is the routine that receives 
control from one task and passes it 
on to the next. It is extremely small 
and extremely fast, and it makes a lot 
of assumptions about the tasks as it 
does its job. This is by design: By mak- 
ing assumptions and forcing the 
tasks to adhere to them, a lot of over- 
head is eliminated. Again, I'll go into 
detail about the context switcher in 
the section on tricks and shortcuts. 

The task manager is composed of a 
group of system routines available to 
every task. They allow a task to cre- 
ate, destroy, and manipulate other 
tasks or itself. 

The heap manager is a collection 
of routines that allow any task to re- 
quest, release, lock, enlarge, or other- 
wise manipulate heap items. 

The message manager is a collec- 
tion of system routines that make 
possible a clean and well-defined 
message-passing protocol between 
tasks. Simply by pointing at a block 
of memory and calling a system rou- 
tine, any task can send a copy of any 
piece of data to any other task. Read- 
ing queued messages from other 
tasks is similarly easy. 

The character I/O manager is a set 
of system calls and interrupt service 
routines. Together with the text 
manager, it makes possible a simple 
I/O structure, in which each task can 
select any physical or logical device 
for I/O by passing a device number. 
Serial input is interrupt-driven, and 
serial output is polled. Device drivers 
can be added or removed from the I/ 
O manager with another set of sys- 
tem calls. 

The text manager is a collection of 


Dr. Dobb’s Journal, January 1986 


system routines that ease the pro-. 


cesses involved in talking to humans. 
It includes powerful routines to get 
and parse command strings as well 
as text-manipulation routines such as 
case conversion, context-sensitive 
string comparisons, and so forth. The 
powerful parsing calls make it easy 
to create a tiny machine-language 
task that includes a complete com- 
mand interpreter and syntax error 
handler. This is very important if a 
significant amount of development is 
to be done in assembly language. 

The trap manager handles all sys- 
tem traps except I/O interrupts, 
which go directly to the I/O manag- 
er. Error traps always cause the sys- 
tem to come to a complete standstill. 
This is important to us because of the 
close interaction between the tasks, 
which must always be in intimate 
communication to fulfill the purpose 
of the system. When an error trap oc- 
curs, all task switching and interrupt 
processing stop and the task in 
which the error occurred takes over 
the system console and enters the de- 
bugger. The human in charge can 
then take corrective action and re- 
start the system with minimal dam- 
age. Obviously this approach would 
be completely unacceptable in a 
commercial operating system, but 
for us, it is ideal because we have all 
the source code for the entire system 
and can often correct bugs as soon as 
they occur. 

No assembly language develop- 
ment system is complete without a 
debugger, of course, especially a mul- 
titasking one. Our debugger is a com- 
mand parser that any task can in- 
voke, either automatically (in 
response to an error trap) or directly. 
It is capable of running alongside 
other active tasks, even multiple 
copies of itself, and it allows the user 
full manipulation and examination of 
memory. 

The heap munger is a distinct task, 
always present, always active, 
whose original job was to survey the 
contents of the heap continuously 
and maintain it as an efficient data 
structure (by using a background 
task for this, we avoided many com- 
plexities). The heap munger has 
turned into quite a bit more than just 
a trash compactor, however. Its re- 
sponsibilities are many and varied, 
from checking the TCB array for in- 
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tegrity and waking up sleeping tasks 
when their ships come in to respond- 
ing to messages from other tasks that 
want to know what the system load- 
ing is so that they can adjust their 
own CPU usage to increase the over- 
all performance of the system. In 
fact, the heap munger is also capable 
of responding to text messages sent 
to it by a human who is operating a 
user task, in which case it responds 
by sending a plain English message 
back to the source task, which then 
displays it for the human to read. As 
a general rule, the heap munger per- 
forms any systemwide activity that 
must be performed at frequent, reg- 
ular intervals. With all these respon- 
sibilities, it is the largest single code 


Oh, Rapture! 


segment in our kernel, weighing in 
at about $A00 bytes. 

The disk munger, like the heap 
munger, is a distinct task that is al- 
ways running except when it’s wait- 
ing for an I/O completion. Because its 
structure and function are applica- 
tion specific, I won't go into it in great 
detail here. I would like to point out, 
however, that by allocating a single 
task to handle each disk device, a 
large number of problems related to 
data contention between tasks can be 
avoided. The disk munger is entirely 
message-driven: As each task re- 
quires a disk access, it sends a mes- 
sage to the disk munger for the de- 
vice it wants to access. Each I/O 
request gets added to a queue of such 
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MULTITASKING OS 
(Continued from page 51) 


messages. When the disk I/O is com- 
pleted, the disk munger sets the 
“wake-up” flag for the requesting 
task, and the heap munger wakes it 
up on its next pass. The requesting 
task then looks in its TCB for the com- 
pletion code from the disk munger. 
Because the I/O requests are high- 
level calls, usually implicitly includ- 
ing the open, read/write, and close 
of the file, there are few file conten- 
tion problems. 

On start-up, a discrete task called 
the system console manager initially 
gains control of the system console 
and puts up a system monitor 
prompt. Until another user task is 
spawned, it is the only task that has 
access to a character I/O device (and 
thus, to a human). The system con- 
sole manager can then give way to 
any other user program. 


Tasks 
Everything that gets done on the sys- 
tem, with the single exception of the 
context switch between tasks, is 
done by a task. Three tasks are al- 
ways present in the system: the sys- 
tem console task, which initially 
runs the system console manager; 
the heap munger; and at least one 
disk munger. The disk munger is ac- 
tually optional, although it’s hard for 
me to imagine doing any useful work 
without using a disk. 

Each task, whether it’s active or 
not, possesses exactly one task data 
item (TData item) in the heap. The 


| TData item is crucially important to 


the proper functioning of the system 
because it’s where each task stores its 
most important local information. 
Every task’s TCB entry contains the 
master pointer to its TData area in 
the heap. During normal execution 
of a task, the 68000 register A5 always 
points to the base of the TData item. 
Before the context switcher passes 
control to a task, it always sets up reg- 
ister A5 for the incoming task. 

The TData item is also the location 


| of the task’s local data stack: The 
| stack goes from the top of the TData 
_ Item down, and the task’s local data 


goes up from the bottom. Note that it 
is the responsibility of each task to 


| ensure that its stack and TData areas 
' do not collide. 
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Each task’s TData item contains 
spaces for various pointers and vec- 
tors associated with its current char- 
acter I/O device, if any. The vectors 
include various standardized rou- 
tines such as InCheck, which checks 
to see if a character is available; In- 
Wait, which waits for a character 
and returns with it; OutCheck; 
OutWait; plus several others. The 
pointers include the addresses of the 
destination for the next input byte (if 
any), the source of the next output 
byte, and so forth. 

Character input is generally inter- 
rupt-driven. Because a task that is 
awaiting input is often ‘‘asleep” (not 
in the active TCB list), it is necessary 
for the interrupt routine to set a flag 
that tells the system to wake up the 
owner of the device. Then, after the 
interrupt has been handled, the heap 
munger, which is always awake and 
active, catches the set flag the next 
time it gets control and performs the 
actual manipulations to return the 
task’s TCB to the active list. In order to 


3 


provide an input time-out, the heap 
munger also awakens each task once 
every ten seconds so that the task can 
test for the time-out. 

Each task may request to be as- 
signed to a character I/O device. If a 
device that is requested is currently 
assigned to another task, the request- 
or will usually have to wait until the 
device is available. For special cases 
such as error traps, however, there is 
a system call that allows the task to 
demand to be connected to a device. 
When a demanded device is released, 
it reverts to the task (if any) to which it 
was attached originally. When a re- 
quested device is released, it always 
becomes available (unattached) again. 
Some devices can be attached to mul- 
tiple tasks at the same time—for ex- 
ample, there is a device called 
MemPrt that reads and writes to 
memory as if it were a character 
stream from/to a serial device. This 
“virtual” device can be simultaneous- 
ly active for different tasks, each with 
its own set of pointers in the TData 
item for reading and writing. 

I wont go into great detail about 
our I/O drivers or the low-level struc- 
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ture of the I/O routines. This sort of 
information is readily available in 
several forms in computer 
bookstores. 


The Good Stuff: Tricks and 
Shortcuts 

The first thing our operating system 
does when it gains control of the pro- 
cessor is to deviously remove the ex- 
isting operating system. This it does 
by using a trick to get into supervisor 
mode (see the listing, page 102). First, 
it shoves a new address into the priv- 
ilege exception vector, which is in 
the hardware vector table in low 
memory. This address happens to be 
that of the second instruction follow- 
ing the one that does the store to the 
vector. The next instruction is a privi- 
leged but otherwise harmless one. 
Thus, when it tries to execute it, it 
traps to the privilege exception vec- 
tor and thence to the next instruction 
in the program. If through some 
quirk we happen to be in privileged 
mode already, the processor harm- 
lessly executes the privileged in- 
struction and falls through. Now we 
are in privileged mode, and we can 
quickly grab the rest of the system. 

Next, we turn off all the interrupts 
in the system as quickly as possible. It 
is important to do this before clear- 
ing memory because a stray inter- 
rupt might happen before we can 
turn it off and it must still vector 
properly. After all interrupts are out 
of commission, we copy our own set 
of vectors into the interrupt table. 

The jump table (discussed later) is 
next moved into place in low memo- 
ry. It is read from a section of object 
code within another assembled mod- 
ule. It’s nothing more than a se- 
quence of more than a hundred ab- 
solute-long JMP instructions. 

Next, we clear the rest of memo- 
ry—except the kernel, of course—to 
zeroes. This is both a general safety 
measure and an aid in debugging: If a 
chunk of memory is nonzero, we 
can be certain that something we did 
caused it to be that way. Also, it’s nice 
to be able to assume that unused 
memory is always zeroed out; it 
makes for much faster initializations 
later on, once the system is running. 

The system zone requires a certain 
amount of initialization. The task 
control blocks must be set up and the 
end marks for the TCB and master 
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HALO the market standard for graphics 


HALO provides software implementors with 
a complete graphics development 
environment. 


USER APPLICATION 
LANGUAGE BINDING 
HALO GRAPHICS KERNEL 


FONT LIBRARIES METAFILE 
DEVICE DRIVERS 


VIDEO PRINTERS ||| PLOTTERS 
DISPLAYS 
VIDEO DOCUMENT ae 
DIGITIZERS} |SCANNERS} | (Nic! 


Device Independent 


Each copy of HALO comes with a full com- 
plement of display, input, printer, film re- 
corder and plotter device drivers. Metafile 
creation and display are included. Media 
Cybernetics is continually developing new 
device drivers to meet the ever changing new 
hardware technologies. 


HALO supports all IBM compatible MS/PC 
DOS systems including Texas Instruments 
Professional™, AT&T 6300™, IBM™ 3270- 
PC and of course the IBM PC, XT and AT. 
Over twenty graphics display boards man- 
ufactured by IBM and leading third party ven- 
dors are supported. A single device driver 
supports all display modes on each device. 
Image input from video digitizers and docu- 
ment scanners is supported. New device 
drivers include the IBM EGA and Profes- 
sional and the AT&T Image Capture and Dis- 
play boards. 


LOCATOR 
DEVICES 





This picture was created with ‘‘Artwork”’, a 
HALO-based application written by West End 
Film of Washington, DC. 


De-Facto Standard 


First released in 1982, HALO has an estab- 
lished base of over 40,000 end users and 
over 100 corporate clients. Numerous HALO- 
based CAD, solids modeling, presentation 
graphics, art packages, mapping and other 
vertical market software applications are 
commercially available. 


As early as June 1984, PC World featured 
an article entitled, “HALO A new software 
library leads the way toward graphics stand- 


ardization and portability.” The July 9, 1985 
issue of PC Week“ featured users stories 
from both Rockwell International Corp., and 
Lawrence Livermore Labs on how they use 
HALO to save development time and money. 
Most recently, Mini-Micro Systems August 
1985 issue stated,’’Widely used, HALO has 
attained de facto-standard status. It’s cer- 
tainly the most widely used library.“ HALO 
has achieved this status because it provides 
a complete device independent graphics en- 
vironment for software developers. Since the 
HALO interface rarely changes, compatibility 
with a new device is achieved simply by add- 
ing a new device driver. 


By incorporating all the HALO device drivers 
into their applications, licensed commercial 
software developers solve distribution and 
compatibility problems. 





This picture was created with “‘Design Board 
3-D”’, a HALO-based application written by 
MEGA-CADD of Seattle, Washington. 


Powerful Graphics Toolbox 


HALO has over 170 functions. Standard 
functions include: point, line, arc, circle, el- 
lipse, polygon, etc. Coloring control functions 
are available for color selection, palette man- 
agement, dithering, and textures. 


Advanced features encompass: image 
compression routines for reducing data stor- 
age requirements; both absolute and relative 
addressing plus individual cursors for graph- 
ics text and interaction; world and normalized 
coordinate systems for windowing, viewport 
and clipping; and a metafile reader and 
generator. 


HALO’s raster extension supports rubber- 
banding and non-destructive modes so that 
polygons and text may be interactively cre- 
ated and moved over a displayed image. 


There are currently over twenty bit mapped 
and stroke text fonts available for HALO. The 
object oriented type faces provide user def- 
inition of line width, size, proportional width, 
angle, and interior fill style. 


HALO’s Virtual Rasterization Interface (VRI) 
frees users from the limited resolution of their 
graphics board by modeling the graphics dis- 
play in memory and having the hardcopy pro- 
duced in the maximum resolution of the out- 
put device. 


HALO can be addressed as a linkable library 
Or as a resident driver depending on the 
application. 


Circle no. 199 on reader service card. 


Faster than VDI 


In benchmark tests by independent compa- 
nies evaluating HALO and GKS, HALO was 
determined to be three to ten times faster 
depending on the function tested. These 
benchmark results made HALO a require- 
ment for many government agencies and 
large corporations. This gives HALO com- 
patible hardware and software significant in- 
roads into these agencies and corporations. 





This picture was created with “‘drafix II", a 
HALO-based application written by FORESIGHT 
Resources Corp. of Overland Park, Kansas. 


Easy to Learn 


HALO comes with a computer aided tutorial. 
This tutorial, entitled LEARNHALO, teaches 
users to become proficient graphics devel- 
opers in less than a day by providing step- 
by-step instructions through graded 
examples. 


HALO is written in Assembler and callable 
from the language you are already comfort- 
able with: Interpretive and Compiled Basic, 
Professional Fortran, MS Fortran™, Pascal, 
Turbo Pascal™, MS C™, Mark Williams C™, 
Lattice C™, Aztec C™, Computer Innova- 
tions C86™, and Golden Common Lisp™. 


increase Market Value of Hardware 


Graphics hardware manufactures receive 
distinct marketing advantages by having their 
products supported by HALO. HALO is the 
gateway to an extensive body of commer- 
cially available software. 


Pricing Information 


A single copy of HALO for one language costs 
$250.00. A second language binding ordered 
at the same time is an additional $150.00. 
Author, Corporate and Site licensing and OEM 
agreements are negotiated on a case by case 
basis. 


To order, or receive more information on 
HALO and other Media Cybernetics, Inc., 
products contact: 


media cybernetics, inc. 
7050 Carroll Avenue 
Takoma Park, MD 20912 
(800) 446-HALO or (301) 270-0240 
Telex #332014 


HALO, LEARNHALO, Texas Instruments Profes- 
sional, AT&T, IBM, MS Fortran, Microsoft C, Turbo 
Pascal, Mark Williams C, Lattice C, Aztec C, Com- 
puter Innovations C86, Golden Common Lisp and 
GKS VDI are all registered trademarks of Media 
Cybernetics Inc., International Business Ma- 
chines, Texas Instruments Inc., AT&T, Microsoft 
Corp., Borland Intl., Mark Williams Co., Lattice Inc., 
Manx Software Systems, Computer Innovations 
Inc., Gold Hill Computers, and Graphics Software 
Systems Inc., respectively. 
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MS-DOS, UNIX, (\>PLEMAE, GP/), 
NETWORKS anc WORE 





ONE c-crec ISAM DOES THEM AL 





$395 COMPLETE 


Specify diskette format: For VISA, MC and COD orders 
e544" MS-DOS eS call (314) 445-6833 
Og ® 


e 8” CP/M FairCom 
The following are trademarks: c-tree and the circular disk logo—FairCom; MS—Microsoft Inc.; 


e 3A" Mac 2606 Johnson Drive 
°8” RT-II Columbia, MO 65203 
CP/M and Access Manager—Digital Research Inc.; Unix—AT&T: Apple—Apple Computer Co. 


© 1985 FairCom 
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Scrap your LINKER 
Frege 


Reliably: 


CUT Compile times (by 15% to 55%) 
CUT Testing times (by 12% to 37%) 


HOW: FASTER C keeps the Lattice C or C86 library and any other 
functions you choose in memory. It manages a jump table to replace 
the LINKER and immediately execute your functions. You can also 
CALL active functions interactively to speed your program debug- 
ging. It includes many options for configuration and control. 


“Automatic” support for new libraries by reading the .OBJ files 
makes support for new libraries quick and simple. 


AVAILABLE FOR PC-DOS, IBM-AT, 
AND ANY 256K MSDOS SYSTEM. 


ONLY $95. 
Full Refund if not satisfied S ems™ 


during first 30 days 
335-D Washi ; 
Call 800-821-2492 D Was ns Sowa Mass. 02061 
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MULTITASKING OS 
(Continued from page 54) 


handle arrays must be set in place. 
The values in the miscellaneous sys- 
tem data area must also be initialized. 

After the system zone is in place, 
the heap is defined from the next 32- 
byte boundary to the end of memo- 
ry. Three heap items are initially set 
aside: a deletion from the beginning 
of the heap to the start of the kernel’s 
code, a fixed (immovable) code item 
for the kernel, and another deletion 
from the end of the kernel to the end 
of memory. Soon, the other tasks will 
be carving up the big deletions for 
their own use. 

Each time a task is spawned, the 
task manager creates a new TCB and 
a new TData item. The first task to be 
spawned is the system console man- 
ager. The system task manager allo- 
cates an item of the proper size from 
the heap, creates a TCB for the new 
task, and adds the TCB to the current 
linked list of active tasks’ TCBs. 

After the system console task is 
spawned, the heap munger and disk 
munger are also spawned. Note that 
none of them begins to execute until 
the initialization code jumps into the 
middle of the context switcher. 

We discovered that one of the big- 
gest sources of “extra” system over- 
head in commercial operating sys- 
tems is the need to manage tasks that 
raight possibly get out of hand and 
take over the system. In most cases, 
such “runaway” tasks are avoided by 
using a hardware timer to assure that 
any given task will only be able to run 
for a preset time. If a task spends too 
much time without releasing to the 
system, the timer interrupt occurs 
and vectors the CPU through to the su- 
pervisor program. This program then 
saves the existing task’s registers and 
status and restores those of the next 
task in line, which then is off and run- 
ning with a newly reset timer. All of 
this requires a lot of tricky and com- 
plex code to ensure that no task can 
“run away’ and lock up the system. 
Also, the constant saving and restor- 
ing of registers and status, which is 
necessary because the context switch 
is interrupt-driven, adds measurably 
to the overhead required for a con- 
text switch. 

We debated for some time about 
the best way to reduce this overhead. 
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Finally, we settled on the answer: 
We developed our kernel as a non- 
preemptive task controller. This 
means that there is no hardware tim- 
er to interrupt each task after some 
preset interval, and no routines are 
required to service such an inter- 
rupt. Instead, we use a simple con- 
text switcher, one that doesn’t even 
bother to save registers or the previ- 
ous task’s status bits. It is the task’s re- 
sponsibility to call the context 
switcher often enough to ensure 
smooth system operation and to 
make sure that it saves any registers 
that it needs (other than A5 and the 
stack pointer). For our application, 
this is perfect because most of our 
tasks spend most of their time wait- 
ing for input or output in the inactive 
task list, during which time the other 
tasks can run unhindered. 

When a task has finished with the 
CPU and is ready to let the next task in 
the active list run for a while, it sim- 
ply calls the context switcher as a 
subroutine using a JSR instruction to 
a low-memory JMP _ instruction 
whose address is fixed regardless of 
the location of the context switcher. 
Even with the added overhead of the 
extra JMP instruction, this method of 
calling is considerably faster than a 
TRAP instruction—the usual method 
of calling a context switcher. 

Once the switcher has control, it 
checks to see if the system tasking is 
stopped (see the listing). If it is, then 
the calling task immediately gets 
back control through a simple RTS. 
Otherwise, it gets ready to call the 
next task. 

The address of a task’s TCB is in its 
TData area. This address is loaded 
into AO. Then the current TData base 
address (in register A5) is subtracted 
from the stack pointer, yielding a rel- 
ative displacement, which is stored 
in the TCB. Now we're ready to move 
on to the next task. 

The address of the next task in the 
circular linked list of active tasks is 
fetched from the old task’s TCB into 
AO. Register A5 is set to point to the 
new task’s TData area by moving its 
address from the TCB, and the stack 
pointer is restored from the relative 
displacement by adding AS to it. 
Then a simple RTS returns control to 
the task. 

This otherwise trivial scheme has 
one slight complication: Frequently, 
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a task will release control with the 
intention of going to sleep for a 
while. This happens, for example, 
when the RAM buffer has no input 
characters for the character device 
attached to a task that is waiting for 
input. When the input finally hap- 
pens, the interrupt routine sets a flag 
that causes the heap munger to wake 
up the task when it next checks for 
such a situation. The problem is that 
the context switcher I have just de- 
scribed has no provision for putting 
the old task to sleep: It assumes that 
both tasks want to stay awake. 

So, we created an alternate context 


switcher that removes the outgoing’ 





task from the active list before calling 
the new one (see the listing). When a 
task wishes to go to sleep, it simply 
calls the alternate context switcher. 
The primary difference is that be- 
fore it moves on to the next task, the 
alternate switcher does some stan- 
dard and fast list manipulation. 

Most commercial operating sys- 
tems use one or more of the TRAP in- 
structions to perform system calls, 
usually going on the premise that 
they are there for that purpose and 
that the TRAP instructions allow pro- 
grams to be more general and more 
easily relocated. Unfortunately, TRAP 
instructions on the 68000 cause a ma- 
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Lattice Works 


eRe eee SS RES 
NEW PROGRAMMER’S SCREEN 
EDITOR INTRODUCED 


Designed specifically for pro- 
grammers, the Lattice Screen Editor 
(LSE) is a fast and flexible, mulkti- 
window editor that is also easy to 
learn and use. 

LSE runs under MS-DOS or 
PC-DOS on most popular machines 
with 128Kb memory. It provides 
standard editor functions such as 
block moves, pattern searches, and 
“cut and paste” In addition, LSE off- 
ers special features for programmers 
such as an error tracking mode and 
three assembly language input 
modes. 

A complete installation program 
is included to remap any of LSE’s 48 
keyboard functions. Menus, prompts, 
help messages and default file exten- 
sions can also be customized for 
individual user preferences. $125.00. 





LATTICE TOPVIEW 
TOOLBASKET NOW AVAILABLE 


Providing more than seventy 
functions, the Lattice TopView Tool- 
basket is designed for software 
developers writing applications for 
IBM’s TopView multi-tasking, multi- 
window environment. 

ee 
ee 


Lattice 
Phone (312) 858-7950 TWX 910-291-2190 
INTERNATIONAL SALES OFFICES: 





The Toolbasket functions elimi- 
nate the need for extensive use of 
assembly language when interfacing 
with TopView. The Toolbasket's 
library includes functions to control 
window, cursor, pointer, and printer 
operations. It also provides access to 
TopView’s cut-and-paste facilities and 
offers debugging services. 

The Toolbasket runs on the IBM 
PC, XT, AT, and compatible systems 
with 256Kb memory. $250.00. Binary 
and source code is available for 
$500.00. 


LATTICE CREATES C COMPILER 
FOR COMMODORE AMIGA 


Amiga C, produced by Lattice for 
the Commodore Amiga, supports 
the Amiga’s 68000 microprocessor 
and offers the same high speed and 
extensive capabilities of the MS-DOS 
Lattice C compiler currently used by 
more than 30,000 software develop- 
ers worldwide. Available from both 
Commodore and Lattice. $300.00. 

In addition, Lattice also offers 
cross compilers that allow you to 
develop Amiga programs on 
MS-DOS or UNIX systems. 

Contact Lattice, to discuss your 
programming needs. Lattice provides 
C compilers and cross compilers for 
many environments including Tandy, 
Sony, Hewlett-Packard, Tandem, and 
IBM Mainframe. Corporate license 
agreements available. 


Benelux: De Vooght. Phone (32)-2-720-91-28. England: Roundhill. Phone (0672) 54675 
Japan: Lifeboat Inc. Phone (03) 293-4711 France: SFDL. Phone (1) 666 1155 
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MULTITASKING OS 
(Continued from page 57) 


jor problem: They take a long time to 
execute, as do the instructions to de- 
code their arguments. The RTE in- 
struction, which returns from a 
TRAP, shares the same problem. 

We could understand the impor- 
tance of relocatable programs, cer- 
tainly, but we felt the long-lasting 
TRAP instruction was too much to ask 
of an ultra-fast, real-time system. We 
therefore designed a different, faster 
way to call system routines: the JSR 
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Better than a brochure. More informative 
than a testimonial. Our guarantee gives 
you the opportunity to see first hand why 
programmers who demand performance 
are using Vitamin C. 


100 
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Find out for yourself why 
Vitamin C users are saying... 


: The best structured and documented C source 


EW second day air, or $20 next day. TX add 6 1/8% 

Fi tax. Includes 100% source, reference manual, 

-4 Step by step tutorial, examples, sample programs. 
F4 Specify Microsoft v3, Lattice, Aztec, Computer 

4 Innovations, DeSmet, or Mark Williams. Visa & 
3 MasterCard accepted. Ask about UNIX, TI-Pro, 
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instruction and an old-fashioned 
jump table in low memory (see Table 
2, page 49, for a timing comparison). 
Instead of using a TRAP instruction 
with an argument following in the 
next word, we simply call one of 
many entry points that are at abso- 
lute locations in low memory. Each 
entry point consists of a single JMP in- 
struction to the actual system call en- 
try point. Not only do we save the ex- 
tra time required for the TRAP and 
RTE instructions but we also avoid 
having to extract the argument word 
from the bytes following the TRAP in- 
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Data + Windowin 
Help System « More! 


Finally! A library of high level C functions 

(not just a bunch of building blocks) designed 

to increase your productivity and help develop 
superior applications in dramatically less time! 
How? Well, Vitamin C automatically coordinates 
the complex tasks and leaves the programmer 

free to be creative! With Vitamin C, for example, 
you'll never even have to think about saving or 
restoring portions of the screen when a window 

is opened, closed or moved. Simply call wopenQ, 
wclose() or wmove() and Vitamin C takes care of 
the complexities. It's just that easy! This 
philosophy of releiving the programmer from 

as many details as possible runs throughout 
Vitamin C. As a result, jobs that used to take days 
are finished in a matter of hours! 


Vitamin C 
include... 


* Complete input formatting 

¢ Unlimited validation 

¢ Full attribute control 

¢ Field sensitive help system 

* Multiple virtual windows 

¢ Fully automatic, collision proof overlay 
and restore 

¢ Print to & scroll background windows 

¢ Animated window "zoom" 

¢ Move, grow, shrink, hide, or show any 
window 

¢ Date & time arithmetic routines 

* "Loop function” allows processing 
while awaiting input 

...and much much more! 


---PLUS--- 


All windowing & data entry features are 
already fully integrated for effortless 
data entry windows, display windows, 
and pop-up menus! 


Coming Soon... VCScreen! 


struction and having to add two to 
the return address to jump around 
the argument because the argument 
is implicit in our choice of which 
routine to call. (With TRAP-based sys- 
tem calls, an argument is required to 
specify which system call to use be- 
cause there are only 16 traps. With 
JSR calls, there can be hundreds of 
separate entries, so no argument is 
required to specify which call is to be 
used.) By using subroutines instead of 
traps, we shaved more than 100 ma- 
chine cycles from every single sys- 
tem call, which makes a measurable 
difference in a machine that uses lots 
of system calls. 


Conclusion 

With the two context switchers just 
described, a small set of carefully de- 
signed system routines, a somewhat 
unusual system calling procedure, 
and a certain amount of cooperation 
from the application programs, we 
have vastly increased the throughput 
of our system. Our approach is obvi- 
ously not well suited to most projects 
as it requires a considerable amount 
of skill and cooperation on the part of 
the programmers. Furthermore, be- 
cause of its nonstandard nature, it is 
poorly suited to any applications that 
are written for commercial sys- 
tems—at least until we get a C compil- 
er running! If you need an extremely 
fast multitasking system for a special- 
ized real-time application and are 
strapped for funds, however, this ap- 
proach can turn a relatively inexpen- 
sive microcomputer into an amazing- 
ly powerful system. To date we have 
done just that for four different hard- 
ware configurations. 

I'd be happy to discuss the philoso- 
phy and tricks in greater detail with 
anyone who is interested. For more 
information on our operating sys- 
tem, write to Nick Turner at the fol- 
lowing address: 


Terra Nova Communications 
10 McGranahan Ct. 
Boulder Creek, CA 95006 


Or call me at (408) 338-9510. Terra 





Our new interactive screen “painter" actually lets you draw 
your input screens. Define fields, text, boxes & borders. 
Move them around. Change their attributes. Then after 
everything is just the way you want it, the touch ofa 
button generates C source code calls to Vitamin C routines 
OR generates parameter files that will dynamically load & 
build each screen at run time. Either way, screen designs 
will be faster & more pleasing with VCScreen! 


(214)243-6197 
Creative Programming 
Consultants 


Box 112097 
Carrollton, Texas 75011-2097 


Nova Communications is a consulting 
firm specializing in small multitask- 
ing systems. DDJ 
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A good C book just isn’t complete without a good C 
compiler to go with it. That’s why we give you both. You get 
a comprehensive 450 page book and a full feature standard 
K&R C compiler with the Unix V7 Extensions. The Book is 
loaded with examples that teach you how to program in C. 
And our fast one pass C compiler comes with an equally fast 


The Best C Book 


== A Powerful C Compiler 
One Great C Value °39.95 





linker so you don’t waste a lot of time watching your disk 
drives spin. You also get a Unix compatible function library 
that contains more than 150 functions (C source code 
included ). And if all that isn’t enough, we offer you a 30 day 
money back guarantee. So what are you waiting for? The 


Language Features 


@ Data Types: char, short, 
int, unsigned, long, float, 
double 


Data Classes: auto, 
extern, static, register 


@ Typedef, Struct, Union, 
Bit Fields, Enumerations 


Structure Assignment, 
Passing/Returning 
Structures 


exciting world of C is just one free phone call away. 


Functions 





MIX Editor 
$29.95 


When you’re programming in a high 
level language you need a high power- 
ed editor. That’s why we created a 
programmable full/split screen text 
processor. It lets you split the screen 
horizontally or vertically and edit two 


100 predefined commands. The editor 
comes configured so that it works just 
like Wordstar but you can change it if 
you prefer a different keyboard layout. 
The editor is a great companion to our 
C compiler. Because they work so 


tolower 
toupper 
rw aol 
untink 
write 
writechs 
xmembeg 
xmemend 
xmemget 
xmemput 
xmovmem 
exit 


ASM Utility 
$40 


The ASM utility disk allows you to link 
object files created by Microsoft's MASM 
or M80 assemblers. Lots of useful assem- 
bly language functions are included as 
examples. 
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Bringing Up the 68000— 





Adapted by permission of the publish- 
er, Prentice-Hall Inc., from the forth- 
coming book Designing and Trouble- 


System by Alan D. Wilcox, available . aL _ 


1986. No part of this adaptation may | 


be reproduced, in any form or by an y | 
means, without written permission | 
from the publisher. 





_ development is star- 


— ee 68000 im | 


here are two ways to bring up | | rae 
: a new 68000 microcomputer e 


system: the hard way and the sa 
easy way. The hard way istousethe | 
traditional approach of designing the | 


hardware and then using a develop- 


ment system along with test software 
and some in-circuit emulation. Given 
enough hours of testing and correct- 
ing problems, the 68000 system has a 
good chance of running successfully. 
In contrast, the easy way is to design, 
build, and test the hardware module 
by module using the 68000 as a free- 
running processor. 

The impact of the free-running 
technique on hardware develop- 
ment is quite startling. The 68000 ker- 
nel shown in Figure 1 (page 61) can 
be made to run so easily that a logic 
probe can test it. You don’t need to 
use sophisticated digital develop- 
ment tools such as a logic analyzer or 
a development system with an in-cir- 
cuit emulator. If troubleshooting is 
necessary, you need only a common 
dual-trace oscilloscope. 

Free running the 68000 means that 
the processor is allowed to execute a 
do-nothing instruction continually. 
This is accomplished by breaking the 


Sn ti ahaa Renee Bes ote nL oes neta i are ee 
Alan D. Wilcox, 60 South Eighth St., 
Lewisburg PA 17837 
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normally closed loop between the 
68000 and its memory, as shown in 
Figure 2 (page 61). Instead of carrying 
program instructions from memory, 
a one-word instruction (call it a NIL 
instruction) can be jammed onto the 
data bus. (The mnemonic NIL is not 
part of the 68000 instruction set per 
se; I coined it as a simple expression 
of the instruction used for free run- 
ning.) Thus, when the 68000 reads 
the data bus for an instruction, it 
fetches the NIL word, executes it, in- 
crements the address, and reads the 
next NIL. This cycling repeats over 
the entire 16-megabyte address 
range; when the processor reaches 
the end of the 16 megabytes, it sim- 
ply starts over again. 

The strategy for bringing up the 
68000 is to design, build, and test the 
68000 kernel shown in Figure 2. Next, 
design and build one additional mod- 
ule, connect it to the kernel, and test 
it while the processor is free run- 
ning. Add yet another module and 
test it while free running. You can 
free run the 68000 all the way 
through the construction of a com- 
plete CPU board. In fact, if a processor 


A First Step 


shooting a 68000 Microcomputer | 


board fails, you can usually free run 
it to help speed troubleshooting. The 
only part of the system that you can- 
not test easily while it is free running 
is the data bus itself, because the NIL 
instruction is forced on the bus. 


The Steps 

Several steps are involved in bring- 
ing up the 68000 using the free-run- 
ning technique. The intent of this ar- 
ticle is to describe the necessary first 
step: how to get the kernel running. 
Once you have the kernel in opera- 
tion, the rest is fairly straightfor- 
ward. Here is a brief overview of the 
entire scenario to complete a work- 
ing 68000 CPU board: 


1. Bring up the kernel. Design, 
build, and test the power system, the 
68000 clock and drivers, the reset and 
halt module, and the 68000 module. 

2. Add a wait state and data trans- 
fer acknowledge (DTACK*) generator 
module. 

3. Add RAM and EPROM decoding 
circuits, connect address and control 
bus circuits. 

4. Write a simple looping program 
for a pair of EPROMs. Remove the NIL 
instruction and close the broken loop 
between the EPROMs and the 68000 
data bus. The processor should now 
be able to read its stack and program 
counter vectors from the EPROMs 
and execute the loop program. 

5. Add the RAM connections to the 
data bus. If the 68000 is still running 
successfully with the simple loop 
program, add more code to include 
reading and writing RAM. If the code 
is a very tight loop, an oscilloscope 
will synchronize easily and you can 
use it to check the timing of the vari- 
ous control lines to all the memory in 
the system so far. 
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6. Modify the reset and EPROM-con- 
trol circuits so that the EPROMs do not 
have to be decoded at address 0 ex- 
cept during reset. Normally, the low 
memory addresses should be RAM so 
that exception vectors can be altered 
dynamically; EPROMs should be else- 
where. 

7. If at least 4K of RAM has been de- 
coded starting at address 8, and the 
EPROMs are decoded for 0 to 7 and 
$8000 to $BFFF, then the system can 
use the Motorola TUTOR EPROM set. 
When you restart the system, assum- 
ing that it does not halt, you can use 
an oscilloscope to see the activity on 
the various processor lines while the 
monitor waits for a console key- 
stroke. 

8. Add a 6850 ACIA decoded at 
$010040 to serve as a console port and 
test it with the TUTOR EPROM set. Run 
various memory-testing commands 
and scope loops to check operation of 
the new system. 


The First Step 

As stated earlier, the first step is to 
bring up the kernel in the free-run- 
ning mode. It seems a bit over- 
whelming when you first try doing 
it, but it really is quite simple. Unless 
you have made a wiring error, the 
68000 is virtually guaranteed to come 
alive and begin executing the NIL in- 
struction. To bring up the kernel, 
you need the power system, the 
clock and drivers, the reset and halt 
module, and the 68000 module. 

The size of the power supply de- 
pends on the nature of the system 
and what loading it will have in the 
final configuration. In my own Case, 
I intended to use the 68000 processor 
board in an IEEE-696 (S-100) system, so 
I needed on-card regulation from an 
8-volt system supply. A common 
7805 circuit was adequate for the 
processor and its RAM and EPROMs; I 
used a second 7805 circuit for the rest 
of the LS-TTL logic on the CPU board. 

Watch the Motorola data manual 
for footnotes. In the case of the 68000, 
although the data indicates a power 
requirement of 300 mA or so, that is 
not the whole story. The fine print at 
the bottom of one page casually men- 
tions that the 68000 might require a 
peak current of some 1.5 A. Make 
sure the power supply can handle 
the peak current without falling out 
of regulation. Likewise, power and 
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Address 
00 0000 
00 0004 
00 0008 
00 000C 


00 0010 


FF FFFC 


Table 1 


68000 
Microprocessor 


Data 
0000 0000 
0000 0000 
0000 0000 
0000 0000 
0000 0000 


0000 0000 


Program 
ORI.B #0,D0 
ORI.B #0,D0 
ORI.B #0,D0 
ORI.B #0,D0 
ORI.B #0,D0 


ORI.B #0,D0. 





Address Bus 


Control Bus 


Data Bus 





Figure 1: The 68000 kernel is the essential hardware for program execution. 


68000 
Microprocessor 


Address Bus 


Control Bus 


Data Bus 


One-word 


NIL instruction 





Figure 2: To free run the 68000, the normal feedback path from memory is 


disconnected, and a NIL (do-nothing) instruction is substituted. 





68000 
(Continued from page 61) 





ground leads to the 68000 need to be 
heavy, say #24 wire rather than #30 
wire-wrap wires. Locate bypass ca- 
pacitors close to each of the power 
and ground connections. 

You can design and build the clock 





180K 
Reset Voc 
re | Disch. 
Thres. 
555 
1mfd Cr 





Gnd. 
Cont. 





.01mfd 


About 200ms 


Trig. | 






Output 


circuit using a crystal, some resistors 
and capacitors, and a 7404 or similar; 
doing this is hardly worth the effort, 
though. For prototype work, being 
able to change the clock frequency 
easily without redesigning the cir- 
cuit is a distinct advantage, so using a 
DIP oscillator is appropriate. I used a 
6-MHz oscillator in my S-100 proto- 







Voc 
7407 
4K7 
ss 
7407 
Voc vy 7407 


220E | oe 
49 “HALT” 


Figure 3: Circuit diagram of a simple power- 


lector devices on the bidirectional HALT* and RESET* controls of the 68000. 
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type to keep within the bus specifica- 
tion; only after I had finished the sys- 
tem did I run it up to 10 MHz and 
later to 12 MHz. 

Also, you will use both the clock sig- 
nal and its complement in the final 
circuit design. The complement clock 
could be derived from a 74LS04, but 
that would introduce a skew be- 








SLAVE CLR 


up and reset timer circuit for a 68000 processor. Note the use of open-col- 
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C Programmers: 


Consider 104 Ways 
To Be More Productive 


lf you find and choose the right development soff- 
ware, you can: cut development effort, make imprac- 
tical projects feasible, and eliminate unproductive, 
frustrating aspects of programming. 


Confused? We'll help you sort thru the huge number 
of alternatives. Call for comparisons or information. 


We carry 27 C Compilers, 4 C Intepreters, 49 Support 
Libraries, 5 C source debuggers, and 19 other C Add- 
ons for programming with MSDOS, Macintosh, or 
CP/M — more than 104 products, really. Here are 
some of the best products available: 


Learn C Programming 


Only $125 
“Introducing C’ Interpreter 


Computer Innovations has done 
it again! This interactive implemen- 
tation is combined with a_ full 
screen editor and a thorough, self- 
paced manual. 

You can develop programs fas- 
ter by getting immediate feed- 
back. Programs will start instantly 
upon your command. There is no 
need to wait “for compile and 
link.” 

Introducing C includes demo 
programs, powerful C language 
interpreter, complete C function 
library, full screen editor, color 
graphics, and C language com- 
patibility. PCDOS $125 


Add Communications 
Features fo 


Your Programs 
Greenleaf Comm Library 


Greenleaf now enables you fo 
communicate with remote systems 
or databases with an asynchronous 
communications library for C. 

Individual transmission and re- 
ception ring buffers combine with 
an interrupt driven system. This 
eliminates the extra function of 
separately calling up the com- 
munications program. 

included are 3 library/object files, 
220 functions; 230 page manual, 
complete source code, library 
tailor-made to suit compiler and 
memory, Hayes-compatible 
modem commands, and a com- 
plete sample file transfer program. 

MSDOS *169 


Shorten Development 
Time, Cut Frustrations 
BRIEF, The Programmer's Editor 


Compile within BRIEF; use autoindent; “templates”, C specific error 


But edit YOUR WAY. 


support... use windows, UNDO, and multiple large files. 


Every feature you'd expect and more are integrated elegantly — and it 


can be modified by you. 


You deserve: 


* the best text editor you can buy.” — John Dvorak, InforWorld, 7/8/85 
“the best code editor...” Davidirwin, Data Based Advisor, 8/85 


PCDOS $Call 


First Aid for 
C Programs 
C ToolSet 
Save time and frustration when 


analyzing and manipulating C pro- 
grams. 


DIFF and CMP - for ‘intelligent’ file 
comparisons. 

XREF - cross references variables 
by function and line. 


C Flow Chart - shows what func- 
tions call each other. 


SORT/MERGE Files for 
Clean, Fast Maintenance 
with OPT-TECH SORT 


Performance should not suffer 
with DOS or other ‘free’ sorts. 
ISAMs alone are slow when 10% or 
even less is changed/added. 
OPT-TECH includes: 

— CALLable and Standalone use 

— C, ASM, BAS, PAS, FTN, COBOL 

— Variable and fixed length 

— ] to 9 fields to sort/merge 

— Autoselect of RAM or disk 





Fast File Access with Source 
C-index + 


C-Index + contains a high performance ISAM, balanced B + Tree index- 
ing system with source and variable length fields. The result is a com- 
plete data storage system to eliminate tedious programming and add effi- 
cient performance fo your programs. 

Features include random and sequential data access, virtual memory 
buffering, and multiple key indexes. 

With no royalties for programs you distribute, full source code, and 


variable length fields C-Index + fits what you are likely to need. 


Save time and enhance your programs with C-Index +. 


MSDOS $375 


— Options: dBASE, BTrieve files 
— ] to 10 files Input 

— No software max for # Records 
— All common field types 

— By pass headers, limit sort 

— Inplace sort option 


C Beautifier - make source more 
readable. 


GREP - search for patterns. 


There are several other pro- 
grams for converting and printing 
programs. — Output = Record or keys 

Portable. Full source code. Try what you're using on an XT: 

CPM, MSDOS $135 _ 1,000 128 byte records, 10 byte key 
in 33 seconds. MSDOS. $90. 


Get File Access with TIGHTER Control 
than an ISAM or a Sort. 
db—_VISTA Data Management 


6 files updating at once, entering data with validation...with no delays! 
Multiuser access at the same time. db_VISTA can do If. 

db_VISTA makes practical sophisticated applications that cannot be 
handled with reasonable performance by a “relational” or “flat file” 
system. But, if you want a simple ISAM, it is included foo. 

Full source, no royalties and “normal” indexed file management are 
part of db_VISTA. Get more for the price of only an ISAM. 

You can minimize data stored and access records even faster and 
more logically than just using indexes. Example: address and transaction 
data should not require redundant storage of customer names or 
numbers. Use pointers. Related data fields point to other related groups 
— the “network model” of data. 

Use db_VISTA as a “normal ISAM” or save programming time, access 
time and file size. Lattice, C86, Williams, Desmet, Microsoft C. 

MSDOS Multiuser source $945, Object $445 
Single user source $445, Object $169 


Unix, Xenix, and MacIntosh also available. Call for details. 


Call for details, comparisons, or for our °C Extras Packet” wifh over 50 pages of information about C support products 


THE PROGRAMMERS SHOP 


The programmer’s complete source for software, services and answers 





128:DC Rockland Street, Hanover, MA 02339 (617) 826-7531 (800) 421-8006 


Ask about COD and PO's. All formats available. Prices subject to change. Names of products and companies are generally their tradem 





arks. 


Circle no. 141 on reader service card. 













CURATE 


a222:tNIS IS - 


Price is nice - and so is a long list of features - but when you 
choose a software package to automate your accounting, don't 
lose sight of the basics of good business record keeping. Basic 
Business, an all-in-one accounting software package consisting 
of General Ledger, Accounts Receivable, Accounts Payable, 
Payroll, Inventory Control, Sales Order Processing, and 
Purchase Order Processing. It offers an excellent price and 


extensive feature list without sacrificing these basic business 


principles: 


Full Audit Trails - to give you complete confidence in the 
accuracy of your data and provide crucial backup information 
when you need it. And double entry accounting keeps your 
books in balance. 


Complete Integration - provides efficient processing for all 
your business transactions, updating ll of your accounting 
records instantaneously. You only enter the transaction once, 
and all supporting modules are updated automatically. 


Flexibility - Basic Business can be adapted to your way of 
doing business, including balance forward or open item 
accounts receivable, departmental or consolidated general 
ledger, variable aging periods and easy entry of manually written 
checks and voids. : 


Extensive Reporting - each accounting module provides 
complete reports, including master lists, transactions, journals, 
Statements and forms. In addition, all data files are compatible 
with Ashton-Tate’s dBase Il and dBase Ill, for the ultimate in 
custom reporting capability. 

With some accounting software, even packages costing 
hundreds of dollars more, you must make detailed estimates 
and complex calculations for the maximum number of 
customers, transactions, inventory items, etc., before using the 
system. Then, when your business grows to exceed these 
original estimates, you must repeat this process. 


Not with Basic Business! All data files are automatically 
initialized when you install the system on your computer. Files 
can grow dynamically as your business increases and 


areusually limited only by the amount of you exceed your 
Original estimates. 


RATE RECORDS, 






Complete accounting S$ | 
software package, only 








FORMS ARE NO PROBLEM! Basic Business uses 
standard forms for invoices, statements, checks, purchase 
orders, etc., which may be ordered with your company name, 
adddress and logo imprinted. 


Basic Business is one of a family of accounting and business 
software packages, and has sold previously for several hundred 
dollars per module. It has been improved, updated and re- 
packaged to sell at a market-busting $89.95 for all seven 
modules. A Point-of-Purchase module, which controls an 
electronic cash drawer and allows direct entry of transactions 
from your sales counter is available. Also a dBase file format 
program is available for importing Basic Business data files into 
dBase II/Ill for custom report generation or other special uses. 


SOURCE CODE AVAILABLE 


Do you have a distinct accounting problem that off-the- 
shelf software won't handle? Special forms or statements? 
Don't write your own accounting system from the ground 


up - start with Basic Business. Call (714) 630-0446 for all 
the details on source code licensing. 


Basic Business can go to work for you today and is available for 
most popular MS-DOS (IBM and compatibles) and CP/M-80 
personal computers. Compare our price, features and attention 
to detail. There is only one choice. . . it's Basic Business. 


Basic Gusiness  .....,...%5..:,.:.... $89.95 
POIm-Olrurcnase Modus ....... .. $99.95 
Goaee Wil fie formats ........ $19.95 


Minimum hardware Required for 
MS-DOS : 128K memory, two 360K 
floppy drives (hard — disk 
recommended for Sales and 
Purchase Order Processing), 132 
column printer, MS-DOS (or PC- 
DOS) version 2.0 or later. 


Minimum Hardware Required for 
CP/M-80 computers: 80 x 24 
character display terminal, 64K 
memory, two 360K disk drives 
(hard disk recommended for Sales 
and Purchase Order Processing), 
132 column printer. 


Circle no. 176 on reader service card. 











SERVICES 


ansfer Service: ‘Advent provides a service beyond the ability of any format 
sion software! We can transfer files between MS-DOS/PC-DOS, CP/M and 
r operating systems in 300 different 3 1/2", 5 1/4" and 8" formats. Includes Apple 
Mac, Apricot, Data General One, Kaypro 2000, Eagle, Epson QX-10 & PX-8 
M), P-150, and North Siar computers. 


ENGINEERING SOFTWARE 


AP: A stand-alone Electronics Circuit Analysis Program for use with passive 
and active circuits consisting of resistors, capacitors, inductors, transistors, op- 
amps, FETs, etc. Features menu driven and very fast processing times with circuits 
ved to disk for later use or editing. 










a _— beech cs . $69.95 


raph printing program. Prints on 80 or 132 column printer. 
mi- — and full logarithmic plots with one or two Y axes in 


_ SPP: This Signal Processing Program contains an integrated set of routines which 
nalyze linear and non-linear systems and circuits and their effects on user 
cified time domain waveforms. Based on a 512 point Fast Fourier Transform and 
_ its inverse. Linear processing is in frequency domain and non-linear processing is in 
time domain. 
«SPP (CP/M & MS-DOS)... 1... eee cece eee tee cece ete e an ceees $69.95 


SOFTWARE UTILITIES 


__ Autodiff: File difference detector. This program finds insertions, deletions, and 
changes between any two files. Autodiff can mark the file, display, or print the 
____ differences, and more! 
_— Autodiff (CP/M)... 6... cece eee eee ee cee erence teen e ees . $29.95 


CP/M DateStamper: Automatically stamp your files with the date it is oa last 
read, or modified. Works without a Real Time Clock , or with many clocks currently 
on the market. Utilities are included to allow copying, erasing, or renaming files 
based on time and date. A time logging utility is included to record computer usage 
___ for business/tax purposes. . 

_ DateStamper(CP/M).............-+--. eu, . $49.95 


Media Master +: Read and Write up to 75 CP/M, MS-DOS & TRSDOS disk formats 
on your IBM or look-alike computer. ZP/EM program is bundled with Media Master 
to allow CP/M programs to run directly on your MS-DOS computer. An $80. 00 value. 

_Modia Masters .................-.... ee eis ses POO08 


Pack and Crypt: Two program set Pack compresses and expands files on disk to 
save space. Crypt encodes files to provide security for sensitive data. Both are ideal 
for use with modem transfers. 2 

Pack and Crypt (CP/M & MS-DOS)..... rr ($24.95 


Sidekick: One of the most popular programs ever written. Use Sidekick as a 
calculator, notepad, appointment calendar, auto dialer, ASCII conversion table and 
much more. On-line help if you forget any of Sidekick’s many functions. 

SitOhiCK (S005) i in et cert . . $54.95 


SmartKey ll: New Release! Same great time saver as the original, and allows 
compiling of definitions you set up with your word-processor! Makes every software 
program you use easier. Can reduce keystrokes by more than 50% by redefining 
any key on your keyboard to be any combination of characters or commands that 
you desire. 

ope r—“—eF™rtr—“ eer rrtr—ei—“‘“;$RE:CUCCC $49.95 


SmarPrint: A powerful add-on to SmartKey, SmartPrint is a vesatile writing tool 
designed to give you full access to your printer's features such as wide, bold, 
condensed, underlined, subscript, superscript, and more. Works great with 
programs like WordStar and others. 

—“—rr—r—————SsS ae $29.95 


Uniform: Your Computer can read and write up to 80 CP/M, MS-DOS / PC-DOS & 
TRSDOS disk formats. Versions available for most popular CP/M and MS-DOS 
computers. Specify your host computer when ordering. 

Uniform (CP/M & MS-DOS) ... 2... 1 eee eee eee ete ees $69.95 


XTREE: Directory maintenance program that graphically displays subdirectories 
and filename paths. Complete control of your directory including delete, rename, 
view, list or show. A must for your IBM or compatible. 

MIREE (MS-DOS) «8 won arte ene ess $49.95 


Super Zap: Disk patch and dump program. If you have used DU, you will love this 
menu driven marvel! 
ire gre tee ee rr——“(iee—“ en $24.95 


ZP/EM: Run almost any CP/M program on your IBM or clone. Use with Media 
Master or Uniform to allow programs on CP/M disk formats to run directly on your 
IBM or compatible computer. 

yes) cee so ——“‘<“‘“ié_ ‘—_ilCOUCONUrCCOrC—C—*—C——C—C—C—iCOC $39.95 







FX, QX-10, PX-8 - Epson Be 5 CP/M - DRI; MS-DOS - MicroSoft, PC-DOS - IBM Corp.; dBASE T & 
dBase Ill - Ashton-Tate: WordStar - MicroPro; UNIX - Bell Laboratories; Apple - Apple Computer Inc.; 
Basic Business - ‘Advent Products in Inc. 


_ 6/80 Ver 3.1: Full featured C compiler and runtime library. One of the fastest on — 
eee -—rr—“—=—“‘“i‘O™CO™O™sO—CSCSSSC*CCO 


PROGRAMMING LANGUAGES 





















the market. Mathpak is included for true 32 bit floating point and signed integers. 


C/NIX: Operating System Enhancement for CP/M. C/NIX gives your system many - 
features in the UNIX OS such a hierarchical directory, /O redirection, “pipes” & 
"filters" and command files. Uses only 2.3K of TPA and 42K of disk. Requires CP/M 
2.x. 


LISP/80: Experiment with the artificial intelligence language. Based on the 
INTERLISP dialect, LISP/80 offers over 75 built-in functions, including file VO, and 
string operations. Complete with 36 page manual and demo programs. 


ee ——“‘ii—O—st—sts—sOStisisCSs—Csi<“ ‘SCOCOC‘C‘C®*=S eee eee «$39.95 


_ Toolworks C: This compiler is a complete subset of C. The two- pass compiler | 
_ produces relocatable object files (.obj) which are compatible with the MS-DOS LINK _ 
program. Mathpak is included for true 32 bit floating point and signed integers. 


Toolworks C Compiler (MS-DOS)................. eee $79.90 
Turbo Pascal: Borland version 3.0. The best Pascal compiler on the market 
Turbo Pascal (CP/M & MS-DOS).....................;5....-.5. $69.95 _ 
Turbo Toolbox: Setof 3 utilities for use with Turbo Pascal. ; 
Turbo foolbox (CP/M & MS-DOS) ........... 6.6. eee eee $54.95 © 
Turbo Tutor: Teaches step-by-step how to use Turbo Pascal. 
Turbo Tutor (CP/M & MS-DOS)............................... $34.95 


Turbo Graphics: Provides full graphics management for producing windows, pie 
and pie charts, circles and other geometric shapes with Turbo Pascal. 
Turbo Graphics (MS-DOS)... .. ... 5 oo ee ee $54.95 


TEXT EDITING 


Punctuation & Style: Improves your writing by catching unbalanced quotes, 
parentheses and brackets, improper abbreviations, capitalization, sentence 
structure, much more. It's like having your own copy editor! 

Punctuation & Style (CP/M & MS-DOS)........... ee : . $125.00 


Word Finder: This powerful 90,000 word Thesaurus allows you to select the best 
word for the application. Works inside WordStar for greater ease of use. Instantly 
searches its dictionary, then displays synonyms, and automatically deletes the 
“wrong” word and replaces it with the "right" word. Requires 380K disk storage. 

Word Finder (Ch/M) i i ees $79.95 


Wordpatch: Print files with tiny, compressed, wide, or wide compressed type faces, 
5 sizes of italic, real superscripts and subscripts, and 6, 7, and 8 lines per inch 
spacing. No new print controls to learn. Supports most popular dot matrix printers. A 
must for WordStar users! 

Wordpatch (CP/M & MS-DOS) .. ne ee $49.95 


The Word Plus: The ultimate spelling checker. Not only finds misspelled words but 
shows you correct spelling options, shows the word in context, allows you to build 
dictionaries of special words you use, and much more. 

The Word Plus (MS-DOS) ..... .. 6 5. ee ee $150.00 


HARDWARE & SUPPLIES 


Finger Print “Letter Writer": Unleash your Epson FX series printer. Add near- 
letter-quality print, IBM and/or Apple Graphics printer emulation, plus 16 other print 
functions! Three replacement chips quickly fit inside Epson FX series printers. Easy 
installation. Does not void printer warranty. 

Finger Print "LetterWriter”.. 1... ee cee etre en eee e eres $79.95 


Diskettes, Double Density: 


Maxell 10-pack w/ storage box: 3M box of 10: 

Singie Sided... .......+..-:- $19.95 Single Sided............. $22.95 
Double Sided .............; $23.95 Double Sidod............ $26.95 
Economy Diskettes: package of 25 including tyvek sleeves. 
cS r—“=“‘“_OOOiOONONCCsissSCSsSsSs=SCi<(“i‘COCOCOCOCsisCsisCtCisisCCiCCOCCC $29.50 
et Se —“i—i—sisres—sis—Ss—Ss=—S—=<AOSssS—s—SsS $31.25 


Call or write for our FREE catalog 


All items are warranteed for 90 days. 30 day money back guarantee if not 
completely satisfied. Guarantee for software applies only if diskette seal is intact. 
Visa and MasterCard are welcome. Please add 2.00 freight per total order and 2.00 
for COD orders. California residents please add 6% sales tax. Prices, availability and 
specifications subject to change without notice. 


National 


(800) 821-8778 
CALLTODAY nia (800) 521-7182 


Hours: Mon - Fri8 am- 5 pm PDT 

DEALER INQUIRIES WELCOME. 
“sas eee 3154-F E. La Palma Ave 
Anaheim, CA 92806 


guevmpmiasesss GE. (714) 630-0446 











68000 (Continued from page 62) 
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Figure 4: Circuit diagram of the minimum 68000 system for free-run test 
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Complete your Heath/Zenith system 
with a subscription to Sextant! 


GEXTAntT 


The Independent Magazine for 
Users of Heath/Zenith Microcomputers 


Whether you use an H/Z100, 
H/Z89, Z90, H88, or H8—you ll 
find articles in every issue which 
apply to your system. 


Explore CP/M, HDOS, Z-DOS, 
and MS-DOS capabilities in Sextant. 
Applications, programs, compatible 
hardware and software, and the 
latest developments in the Heath/ 
Zenith community are among the 
topics covered in every issue of 
Sextant. 


Regular Sextant features include: 

e “How-to” articles to help you 
enhance your system. Read how 
other users have altered their 





systems to suit their needs—and 
how you can too. 


Reviews of products from Zenith 


and independent suppliers, that you just won't find.anywhere 
which can help answer your else. 

questions about hardware and 

software purchases you re ¢ Coverage of community affairs. 
considering. Youll read about major events 


and personalities in the Heath/ 

Short program listings—including Zenith user community, and what 
utility programs and games— effect they could have on you. 
which you can use immediately. 

You can't afford to miss all the 
Advertising by independent information packed into each issue 
suppliers who support Heath/ of Sextant. Your Heath/Zenith 
Zenith systems. In Sextant you'll _ system just isn’t complete without 
find many products advertised a Sextant subscription! 


oo Get the information you need to get the most from your system! 
eS ta 
Ls Start your subscription today! 
Call Toll Free: 800/341-1522 PA*TEL Sf er ot te 


TT 


Or mail this coupon to: 
Sextant, Dept. DD 1 
716 E Street, S.E. 
Washington, DC 20003 


Please allow 6-8 weeks for delivery 
of your first issue. 
TT 


Your satisfaction with Sextant is 
completely guaranteed. If at any 
time youre not completely satisfied, 
just let us know and your money 
will be refunded—even for the 
issues you ve already received. 


| | Send me: 
O 12 issues for $29.91 ($34.50 to Canada) 
| O 6 issues (1 year) for $14.97 ($17.25 to Canada; $21.00 overseas via 


surface mail, $35.00 via air mail) 
O Payment enclosed (Checks must be in U.S. dollars payable on a U.S. 


bank.) 
MasterCard 
, & 


OO Bill me VISA 

OChargemy: 0 
Parishes. ee eh te ee eh ee 
Name 


| Address 

















Sextant, Dept. DD1, 716 E Street S.E., Washington, DC 20003 
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Figure 5: Power-up performance of the 555 timer circuit. On power-up, the 555 timer with the parts given in the sche- 
matic provides about 175 ms RESET* to the 68000. 
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Figure 6: Typical free run starting from a complete RESET* and HALT* asserted low. The clock is running at 6 MHz. 


DTACK* is grounded in this example. 
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Figure 7: Typical free run with the DTACK* circuit enabled. The clock is 6 MHz, and there are no wait states inserted. 


68 Dr. Dobb’s Journal, January 1986 





THE International UNIX* Event of the Year! 


February 4-7, 1986 / Anaheim Convention Center / Anaheim, California 


UniForum 1986, the International Conference 
of UNIX Users, has established itself as 
THE premier UNIX conference/trade show. 


Mi Over 200 major vendors exhibiting their 
newest UNIX-based hardware, software, 
systems, services and peripherals. 


m@ A complete tutorial and conference pro- 
gram. Multiple sessions target the connec- 
tivity of UNIX between the user and techni- 
cal environments; the hardware and 
software technology for office systems and 
workstations; the interface between man 
and machine, machine and machine, and 
much more. Day-long tutorials provide 
intensive, focused material on specific sub- 
jects in UNIX... while the conference ses- 
sions highlight the latest developments in 
the continuing evolution of UNIX. 


*UNIX is a trademark of AT&T Bell Laboratories. 


Sponsored by 





The International Network of UNIX Users 


Mi FREE UNIX Introductory Workshops. 
Mi Birds-of-a-Feather impromptu sessions. 


Call us NOW for your FREE Show-Only 
Badge and complete registration information 
on the dynamic conference/tutorial program. 


The power and potential of UNIX are impor- 
tant to you. UniForum 1986 is THE com- 
puter event you can’t afford to miss! 


we UniForum. 


The International Conference of UNIX Users 


For Complete Information, Call: 


800-323-5159 


(In Illinois, Call: 312-299-3131) 


Or Write: 

UniForum 

2400 East Devon Avenue 
Suite 205 

Des Plaines, IL 60018 
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Figure 8: Typical free run with DTACK* enabled. This timing shows DTACK* delayed enough to cause two waits in each 
bus cycle. 
Timing Waveform Diagram_____________ INSERT to add aces. 


Sample Period |RleMas)| 
Magnification 
Magnify About 
Cursor Moves 
1 | X 
0 

CLK68 

= 


Des 






1.000 ys/div 
10.00 ns/sample 
0.0 us 0 to x 


— 





UO] Bios 


Be) Pe 


ESS : | 
S M1 


| 
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Figure 10: A closer look at the bus controls when TUTOR executes a write bus cycle 
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Now You Know Why 
_| BRIEF is BEST 


‘BRIEF, The Programmer's Editor, is simply the best text 
editor you Can buy.’ John Dvorak, INFOWORLD 7/8/85 


“A bona fide Undo...” 


Steve McMahon, BYTE 3/85 


As Mark Edwards describes in DR. DOBB’S 
JOURNAL (11/85), ‘*BRIEF has an outstanding 
undo facility. The default configuration allows 
the last 30 editing commands to be undone. This 
number can be raised to a maximum of 300 


The Program 
Editor with 
the BEST 
Features 


Since its introduction, 
BRIEF has been sweep- 
ing programmers off 
their feet. Why? 
Because BRIEF offers the 
features MOST ASKED 
FOR by professional 
programmers. In fact, 
BRIEF has just about 
every feature you ve 
ever seen or imagined, 
including the ability to 
configure windows, 
keyboard assignments, 
and commands to 
YOUR preference. One 
reviewer (David Irwin, 
DATA BASED ADVISOR) 
put it most aptly, 
(BRIEF). . is quite 
simply the best code 
editor I have seen.” 


Solution 
Systems ™ 


commands. Until you reach this maximum or run 
out of RAM, every command you issue can be 
undone. So if you make ten changes and then 
realize that the first one was an error, you can 
undo all the changes back to the mistake. .. 
Needless to emphasize, this facility can save 
endless grief.”’ 


No other editor has this capability. 





Every Feature You Can Imagine 


Compare these features 
with your editor (or any 
other for that matter). 

e FAST 

e¢ Full UNDO (N Times) 

e Edit Multiple Large Files 

¢ Compiler-specific 

support like auto 

indent, syntax check, 

compile within BRIEF, 

and template editing 

Exit to DOS inside BRIEF 

Uses all Available Memory 

Tutorial 

Repeat Keystroke 

sequences 

15 Minute Learning Time 

e Windows (Tiled and 
Pop-up) 


¢ Unlimited File Size 
-(even 2 Meg!) 

¢ Reconfigurable Keyboard 

¢ Context Sensitive Help 

e Search for ‘‘regular 
expressions — 

e Mnemonic Key 
Assignments 

¢ Horizontal Scrolling 

¢ Comprehensive Error 
Recovery 

e A Complete Compiled 


Programmable and 
Readable Macro Language 
e EGA and Large Display 
Support 
e Adjustable line length 
up to 512 


MONEY-BACK GUARANTEE 
Try BRIEF ($195) for 30 days — If not satisfied get a full refund. 


TO ORDER CALL (800-821-2492) 


SOLUTION SYSTEMS, 335-D WASHINGTON ST., NORWELL, MA 02061, 617-659-1571 


Circle no. 147 on reader service card. 


_ — ee 


Program Editing 
YOUR Way 


A typical program editor 
requires you to adjust 
vour style of programming 
to its particular require- 
ments -— NOT SO WITH 
BRIEF. You can easily 
customize BRIEF to your 
way of doing things, 
making it a natural ex- 
tension of your mind. 
For example, you can 
create ANY command and 
assign it to ANY key - 
even basic function keys 
such as cursor-control 
keys or the return key. 


The Experts Agree 
Reviewers at BYTE, 
INFOWORLD, DATA 
BASED ADVISOR, and DR. 
DOBB'S JOURNAL all came 
to the same conclusion - 
BRIEF IS BEST! 

Further, of 20 top in- 
dustry experts who were 
given BRIEF to test, 15 
were so impressed they 
scrapped their existing 
editors! 


BRIEF-is a trademark of UnderWare 











THINK COMPUTER 
INNOVATIONS 


\} C86 VERSION 2.3 with Source 
1) bal Level Debugging Support 


The C language has rapidly become the development language of choice 
for applications ranging from Operating Systems to Accounting Packages. 
WHY’? Its structured approach and extreme portability make it perfectly 
suited to today’s fast-paced environment. 

Of all of the C Compilers available for PC/MSDOS, more programmers 
choose COMPUTER INNOVATIONS’ C86. WHY? Because it’s part of a 
COMPREHENSIVE family of C products with an unparalleled reputation for 
performance, reliability, and stability. 


C86 2.3 C COMPILER 


C for PC/MSDOS began with C86 and today it remains perhaps the most solid, stable 
C Compiler available. Even competitor's ads show C86 as a consistent top level performer 
in benchmark testing. eS eS. 

Version 2.3 offers a host of new features including source level debugging support and 
a 40% boost in compilation speed. Cail for complete specifications. 
COST: $395 UPDATE TO 2.3: $35 w/old diskettes NOT COPY PROTECTED 
CALL ABOUT VOLUME DISCOUNTS 


LEARN C INTERACTIVELY WITH INTRODUCING C 


Intimidated by rumors about the difficulty of learning C? Need to train your staff quick- 
ly? INTRODUCING C can help. INTRODUCING C combines a thorough, self-paced 
manual with a unique C interpreter to provide a fast, efficient method of learning C. 
Designed for both professional and casual programmers, it provides a comprehensive 
understanding of important C concepts such as standard K&R syntax and operators, full 
structures and unions, arrays, pointers, and data types. Requires IBM PC, XT, or AT with 
one disk drive and 192K bytes of memory. 

COST: $125 - NOT COPY PROTECTED 


Ci PROBE SOURCE DEBUGGER 


Take advantage of C86 2.3 source level reek support with Ci! PROBE. Cut down 
program development time and save money! Ci PROBE is highly economical yet has the 
features of ee costing far more. 
COST: $225 - NOT COPY PROTECTED 


C-TERP C86 COMPATIBLE INTERPRETER 


The C-TERP INTERPRETER is a full K&R implementation that allows you to write code 
and execute it immediately without the compile and link steps. Once you have your pro- 
gram running with C-TERP you can compile the code (without alterations) with C86 for 
fast, efficient executable files. CTERP requires 256K, 512K is recommended. 

COST: C86 version - List Price: $300, Special Computer Innovations Price $250. 
peg C86 & Lattice version - List Price: $400, Special Computer Innovations 
ce ; 

































Start With Us, Stay With Us 


Computer Innovations offers a complete range of products that let you 
enter the C environment and create applications with the most advanced 
set of development tools available. Unparalleled tech support assures that 
you're always at the height of productivity. 


To order cali: 800-921-01 69 


fi: COMPUTER 
m= INNOVATIONS, INC. 


980 Shrewsbury Ave., Tinton Falls, NJ 07724 © (201) 542-5920 


_C-TERP is a trademark of Gimple Software. Prices and specifications subject to change without notice. 
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68000 
(Continued from page 62) 


tween the two clocks of some 10 to 15 


ns, depending on loading. Although 
this amount of skew seems slight, it 
can cause severe timing difficulties 
when the clock speed gets above 10 
MHz. The 74265 quad complemen- 
tary-output element with a worst- 
case skew of 3 ns isa good selection; in 
my 12-MHz prototype, this selection 
has worked out well. 

The reset and halt module has two 
basic functions. One task is to hold 
the 68000 HALT* and RESET* lines low 
for at least 100 ms on power-up. Its 
other function is to pull the same two 
lines low for at least ten clock cycles 
for a reset button press at any time 
after the power has been on. 

The circuit in Figure 3 (page 62) 
provides a simple and reliable reset 
function for the 68000. It provides a 
reset pulse either on power-up or 
whenever you press the reset button. 
Open-collector devices are required 
because the 68000 HALT* and RESET* 
controls are both bidirectional. For 
example, the 68000 can itself drive 
the RESET* line to reset any peripher- 
als if the software reset instruction is 
issued. Also, the 68000 can force the 
HALT* line low if the system cannot 
continue processing. A single “halt”’ 
LED connected as shown is valuable 
in helping bring up the processor for 
the first time. ! 

The last module in the minimum 
system is the 68000 processor shown 
in Figure 4 (page 66). By now, you 
should have checked the power, 
clock, and reset modules for proper 
operation and connected them ready 
for the 68000. If the processor is 
wired as shown, it should begin free 
running immediately. On power-up 
the HALT light should flash briefly, 
and then the TEST light will begin 
flashing on and off. 

Earlier I referred to my so-called 
NIL instruction. As you see in the cir- 
cuit, the data bus is completely 
grounded so the NIL has an opcode of 


| 0000. In the context of its use in free 
_ running, it acts like a no-operation or 


NOP. The 68000 does have a NOP op- 


| code ($4E71), but this NOP will not 


| work as a free-running instruction. 


A critical constraint on the opcode 
precludes using the NOP instruction 
in free running: Whatever is wired 
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to the data bus for the 68000 to read 
upon reset must be even. The reset 
sequence is this: The 68000 will do 
four 16-bit reads to get the initial SSP 
and PC vectors; then it will fetch its 
first opcode at the address in the PC. 
If the PC is not aligned on an even 
address, the 68000 detects an address 
error and immediately begins illegal- 
address exception processing. It tries 
to push its status on the stack at the 
beginning of the exception, but the 
stack is also an illegal address (the 
same noneven number as in the PC). 
The result is the fatal double bus 
fault that stops all processing and as- 
serts the HALT* output. 

The opcode 0000 does in fact corre- 
spond to a real instruction in the 
68000 set. It is the mnemonic ORIB 
#0,D0, and it was selected for free run- 
ning for two reasons: first, because it 
was even; and second, because con- 
necting all grounds to the data bus 
was simpler than making sure one or 
two data lines had a logic 1 on them. 
When the instruction is considered 
in its free-running environment, the 
appearance of its memory is as 
shown in Table 1 (page 61). 

You can calculate the execution 
time of this “program”’ easily. Each 
instruction takes eight clock cycles 
(two read bus cycles), so for a 6-MHz 
clock, the execution time is 8 X 167 ns 
or approximately 1.33 microseconds. 
A complete sweep through the en- 
tire 16 megabytes of the 68000 ad- 
dress range takes 1.334 megabytes 
or about 5.59 seconds. If you connect 
the TEST light to the top address bit, 
A23, it will be on for 2.8 seconds and 
then off for 2.8 seconds. I connected 
the TEST light to A20 permanently. It 
stays on for 0.35 seconds and off for 
0.35 seconds—a reassuring flash rate 
during development work and not 
nearly as unsettling as a constant red 
HALT light. 


Results 
Figure 5 (page 68) shows the perfor- 
mance of the power-up timer circuit. 
The top plot is the main system 
power as it comes on and eventually 
regulates at 5 volts on the CPU board. 
About 175 ms after the supply volt- 
age is valid, the RESET* and HALT* 
lines go high to successfully com- 
plete a full 68000 reset. 

The effect of this reset operation is 
shown in Figure 6 (page 68). The last 
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two lines on the timing diagram are 
the RESET* and HALT* controls for the 
68000. After its internal start-up time, 
the 68000 asserts its address strobe 
(AS*) and its data strobe lines (UDS* 
and LDSs*) in the first read bus cycle. 
After four read bus cycles, the pro- 
cessor PC begins execution at address 
0, as discussed above. 

DTACK* is the asynchronous bus 


control line that normally comes 
back from memory or peripherals to 
tell the 68000 to complete the current 
bus cycle. During the initial free run 
of the processor, there is nothing 
connected that will acknowledge a 
data transfer, so the control is 
grounded. The timing diagram 
shows this line at a logic low. The 
timing diagram also shows the read/ 


Objective-C 
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Learn and Use AI Technology 
In Your First Evening 
With TransPROLOG-PC 


A complete Prolog Interpreter, Tutorial, and set of Sample Programs: 


_] Modify and write Expert Systems. 
Use the simple ‘‘Guess the animal’’ 
example on the Tutorial or use the 
sophisticated system for Section 318 of 
the US Tax Code written by one of the 
TransPROLOG-PC authors and 
published in the March, 1985 issue of 
Dr. Dobb’s Journal. 


|] Understand Natural Language 
Use the sample program that produces 


a dBase DISPLAY command as output. 


L] Write Symbolic Math or Abstract 
Problem Solving Applications 

This is a complete Prolog program to 
convert from Farenheit to Centigrade: 
f_to_c(C,F):- C is(F-32) *5/9. Planning 
programs and games are included to 
help you learn. 


L] BECOME FAMILIAR WITH 
PROLOG IN ONE EVENING. 


Programming experience is not required, but a logical mind is. Serious development of ex- 
perimental systems is practical with TransPROLOG-PC. | or 2 pages in Prolog is often equiva- 


lent to 10 or 15 in C. 


RECENT IMPROVEMENTS: MSDOS commands, on-line help, load Editor. 
AVAILABILITY: All MSDOS, PCDOS systems. 


ONLY 
$125 
Full refund if not 


satisfied during 
first 30 days. 


Sypems 


335-D Washington St. 
Norwell, Mass. 02061 
617-659-1571 
800-821-2492 
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LEARN LISP 


Interactively and Write ‘‘Realistic’’ Programs 


with TransLISP-PC for Only $75 


A “COMMON LISP”’’ compatible Tutorial, Interpreter, Debugging, and 
Pretty Printer plus a Fast, Full Screen Editor, Samples and Help 


() Start Easily and Quickly: 

A complete, modular tutorial helps you 
learn LISP at your own pace. An in- 
tegrated, interactive environment provides 
all of the elements needed to enter, modify, 
analyze and debug programs. 


_) Natural Language, Expert Systems and 
Mailing List: 
Natural Language concepts are illustrated 
by a phone number retrieval program. 
Choose the best word processing program 
for you with the Expert System. File handl- 
ing and typical data processing work are 
demonstrated by a Mailing List program. 


L] Write Realistic Programs: 

Short examples and substantial programs of 
about 10 pages in length help you learn by 
modifying, studying and using the key con- 
cepts needed to write programs of 1000 
lines or more. 


_] The ‘‘COMMON LISP”’ Standard: 
TransLISP-PC includes a 230+ function 
subset of the ‘“COMMON LISP”? Standard. 
Use extras like the MSDOS interface and 
graphics. Or use ‘‘strict compatibility’’ to 
make programs written in TransLISP-PC, 
with no changes, work with other COM- 
MON LISP systems like VAX LISP, 
GC/LISP or LISP Machine LISP. 


Use and Modify the ‘‘Which Word Processor?’’ program 
to learn about EXPERT SYSTEMS. 
Ruts on any MSDOS or PCDOS Systems: Not copy-protected, TransLISP-PC is available in just 


about any 3’’, 5’’ or 8’’ format. PC compatibles can run TransLISP-PC with no installation pro- 
cedure. 192K memory and | floppy drive are the minimums required. 


ONLY 


For Beginners and Experienced Programmers 


$75 > ° 335- Washington St. 
Full refund if not Solution Norwell, Mass. 02061 


satisfied during 
first 30 days. 


ystems ”™ 


617-659-1571 
800-821-2492 
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68000 
(Continued from page 73) 


write control, R/W*, as constantly 
high because the 68000 only does a 
read bus cycle when it is free 
running. 

Figure 7 (page 68) shows the free- 
running processor with a DTACK* 
generator in operation. Notice the o 
and x markers bracketing a single 
bus cycle. The normal read bus cycle 
has a total of four clock cycles. If 
DTACK* is delayed for two cycles, as 
shown in Figure 8 (page 70), then the 
bus cycle is lengthened and two 
“waits” are inserted into each bus 
cycle. When you interface memory 
or peripherals to the 68000, you can 
design each external module to hold 
back DTACK* until its unique timing 
requirements are met. 

As an example, the timing diagram 
in Figure 9 (page 70) shows the sys- 
tem while not free running: It is exe- 
cuting the monitor program (TUTOR) 
and waiting for a keystroke. The sys- 
tem was set to provide eight waits for 
I/O read operations, nine for writes, 
and three waits otherwise. Figure 10 
(page 70) shows a close-up look at the 
bus cycles. The lower timing line, 
marked sM1, is the S-100 bus status 
indicating an opcode fetch. 


Summary 

Bringing up the 68000 using the free- 
running technique is very different 
from the more traditional approach- 
es to getting a processor running. 
You can see, though, just by the brief 
description of this first step in bring- 
ing up the 68000 kernel, that you do 
not need sophisticated equipment to 
get started. 

There is more to be said about all 
the steps beyond this first free-run- 
ning processor; no doubt many ques- 
tions remain unanswered. From my 
experience, though, the understand- 
ing you can get from doing a free- 
running 68000 is very valuable, and it 
can help you go on to design and 


_ build a complete system successfully. 


| Availability 


The TUTOR firmware is available di- 


rectly from the author. 


DDJ 
Reader Ballot 


Vote for your favorite feature/article. 
Circle Reader Service No. 4. 
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Do you own a computer? Join 


Do you want to know more about using it? Join 


Do you find the manuals incomprehensibie? Join 
Do you want access to lots of software? Join 
Do you need a technical support hotline? Join 


FOG is a users group with 15,000 members from around the 
world who attend local group meetings at over 300 locations. Com- 
puter systems owned or used by members include all of the Osborne, 
Morrow, Kaypro, and IBM systems;the Zorba; the PMC MicroMate; 
the CompuPro System 10; the AMQUTE; Epson QX-10 and PX-8; the 
Lobo MAX-80; and many more. 

FOG was started in October of 1981 by a small band of early buy- 
ers of the Osborne 1 whose primary purpose was to organize a library 
of public domain software. A newsletter was quickly started to act as 
a focal point for the group’s activities. As the market expanded and 
new manufacturers created competing models, these owners joined 
the group. The large number of excellent contributions to both the 
library and the FOGHORN has produced an extensive library of disks 
and a typeset (70 or more pages) monthly publication aimed at CP/M 
users. Recent interest in 16- and 32- bit operating systems resulted 
in the creation of a separate publication for those users. (All back is- 
sues for both publications are available for a nominal fee which in- 
Cludes shipping in the U.S.) 7 

A network of BBS-RCP/M systems was started to increase access 
to the disk library. There are now about forty systems around the 
world in the network with more going up every month. Most of the 
systems are on line 24 hours per day. Phone numbers are listed in 
each issue of the FOGHORN. Registration is required under a system 
which allows FOG members to register on line. 

FOG holds no meetings. Instead, meetings are organized by local 
groups. 140 of these groups have joined the FOG network, thus in- 
creasing the sharing of information, tips, problems and so on. Those 
local groups which opt to formally join the FOG network receive a 
portion of local member dues to assist with the cost of maintaining a 
local copy of the disk library. 

The FOG library is organized on 170K disks so that members may 
order library copies in their own format. The library disks are care- 
fully screened to be sure that each program works and is fully docu- 
mented. Members who download from one of the RCP/M systems or 
copy disks at their local Affiliated Member Organization (supplying 
their own disks) do so at no charge. Those who find this inconvenient 
may order the disks from the FOG office. A printed library directory 
is available to help you find the programs you are seeking. A Starter 
Disk of essential utilities has been prepared for new members. 

The FOG office in Daly City is open 10:00 am to 5:30 pm Pacific 
time. Technical support personnel are available to answer questions 


Or to guide you in finding a program or identifying the source of op- 
erating failure. Other staff members will refer you to your nearest lo- 
Cal group or aid you in obtaining copies of the disk library and other 
materials. 

Dues in FOG are $24.00 per year. This entitles each member to a 
subscription for one of the publications each month as well as ac- 
Cess to the disk library and RCP/M network. Members who choose to 
receive both publications may do so for $42.00 (plus applicable post- 
age Charges) per year. Local group meetings are open to the public 
without charge although access to the disk library is restricted to the 
membership. The FOG Disk Library contains only public domain 
software. Piracy (the copying of proprietary software) is strongly 
condemned. 

In the United States, the publications are normally mailed by non- 
profit bulk mail. (FOG is a corporation in the state of California and 
has obtained its non-profit, tax exempt status from both the state and 
federal governments.) For those members who live out of the country 
or who prefer first class delivery, additional postage must be added 
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COM: An 8080 Simulator 





fter I bought a 68000-based S- 
A 100 system, I found that I 

needed to run several CP/M 
2.2 (alias CP/M-80) software packages, 
none of which were available in 
equivalent forms for my machine. I 
was faced with two options—either 
buying another processor board so 
that I could run these programs or 
writing an 8080 simulator. The soft- 
ware approach seemed infinitely 
preferable. This also seemed like an 
opportune time to find out just how 
fast my 68000 really was. So I set out 
to write an 8080 simulator (which I 
named COM because it interprets 
.com files). 

In principle, writing a simulator is 
simple. You just set up a set of fake 
registers and start picking up opcodes 
and interpreting them. Unfortunate- 
ly, it’s the little details that get you. 
This simulator took about twice as 
long to write as I expected. As it is, it 
isn’t perfect. In fact, it would slow 
down considerably if it were. Howev- 
er, most programs aren't bothered by 
the imperfections, and the speed dif- 
ference would be significant because 
the simulation is already on the slow 
side of usable. I wrote COM to run as 
fast as possible. 

The simulation speed is approxi- 
mately that of a 1.4-MHz Z80 proces- 
sor based on a sample assembly with 
MAC. (My 68000 system is an 8-MHz 
CompuPro/Morrow single-user hy- 
brid running CP/M-68K 1.2, with 16- 
bit no-wait-state memory.) Simula- 
tion time can vary widely, as some 
8080 instructions aren't easily simu- 


Jim Cathey, ISC Systems Corp., TAF- 
C8, Spokane, WA 99220. 
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y Jim Cathey 


Simulation time can 


vary widely, as some 


8080 instructions 


| aren‘t easily simulat- 
ed with the 68000. 


lated with the 68000. MAC was cho- 
sen as a typical example program. 
LU, the public-domain library utility, 
is one of the worst performers. It 
spends vast amounts of time calculat- 
ing CRCs. This instruction sequence 
isn’t very efficient on the 8080 (using 
a C arithmetic library), and the simu- 
lation magnifies any inefficiencies. | 
didn’t time LU for comparison, but I 
thought that the simulation had 
crashed because nothing seemed to 
be happening for long periods. An- 
other poor performer is WordStar. | 
tried simulating it because it is so 
popular and because it gives the sim- 
ulator a thorough workout. The sim- 
ulation works, and it does so at an ac- 
ceptable performance level most of 
the time. 


About the Program 
The program source is broken into 
four files. Listing One (page 104) is the 
first file, which contains the start-up, 
command-line, CP/M-2.2 simulation, 
and trace routines. Listing Two (page 
112) contains opcode simulation sub- 
routines and flag tables. The rest of 
the listings will be continued in the 
March issue. 

The program starts out by prompt- 














for the MC68000 


ing for the trace end points if that 
code has been included. (There are 
several conditional assembly trace 
features in COM.) It then builds the 
8080 environment in a 64K buffer 
(biggest TPA yet!) and initializes the 
68000 simulation registers, with the 
8080's PC set to 100H into the buffer. 
It then calls a subroutine that loads 
the specified .com program into the 
buffer and transfers the 68000's sec- 
ond FCB to the 8080’s first FCB and 
passes the remains of the command 
tail to the 8080’s DMA buffer. If ail 
goes well, the program then enters 
the main loop at label MLOOP. Here it 
fetches the next 8080 opcode and 
uses it to index into a table of 256 
68000 subroutines (one per opcode— 
big, but fast) and jumps to the select- 
ed subroutine. Each opcode subrou- 
tine then picks up what parameters 
it needs and plays with the fake reg- 
isters appropriately. Each subroutine 
then jumps back to MLOOP, which re- 
peats the process. This continues un- 
til a service request is picked up or 
until an illegal instruction is found. 
The service request used by the 
simulation is the HLT opcode ($76). 
HLT is followed by a 1-byte parame- 
ter telling the 68000 which action to 
take. All BIOS/BDOS functions are im- 
plemented as service requests. After 
the service is performed, execution 
continues at MLOOP (or at the byte fol- 
lowing the parameter—it depends 
on your point of view). Refer to the 
8080 Environment section for more 
details on how service requests are 
used by the 8080's BDOS/BIOS. 
Register dumps are caused by ille- 
gal opcodes or are done during a 
trace. They are easily interpreted 
(registers SO-S3 are the top four en- 
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tries on the stack) as the current in- 
struction is also disassembled. Illegal 
opcodes terminate the simulation af- 
ter the register dump. 

Flag simulation is done with two ta- 
bles. Because any 8080 logical opera- 
tion that sets the parity flag also clears 
the carry bit, these flag results are 
based solely on the value in the accu- 
mulator. The simulator uses a 256- 
byie flag lookup table for these opera- 
tions. Similarly, anything that 
conditionally sets carry (an arithmetic 
operation) doesn’t need to set the pari- 
ty flag if the code is intended to run 
on a Z80. (This describes all CP/M-2.2 
software I was interested in.) Another 
16-byte table can therefore be used 
for arithmetic flag results. The 4-bit 
flag field of the 68000’s status register 
is used as the index for this second ta- 
ble. The 68000 does have an overflow 
flag, so this is substituted for the pari- 
ty bit of the 8080 (exactly as in the 
Z80). This causes one problem that is 
discussed in the Known Faults sec- 
tion. Treatment of the half carry bit is 
also discussed later because it doesn’t 
fit into either of the tables. 

The CP/M-80 environment simula- 
tion is greatly simplified (to my great 
disappointment) by the strong re- 
semblance of CP/M-68K to CP/M-80. 
Most of the calls are directly translat- 
able. There are a few exceptions, 
though, and they require the bulk of 
the code. 

1. Any call referencing an FCB re- 


quires that the byte order of the Ran- , 


dom Record field be switched, if the 
call uses that field. 

2. CP/M-68K can't open a file in any 
but the base extent. You have to 
change such requests to an open in 
the base extent and then do a Ran- 
dom Read to the point you wanted. 

3. Direct console I/O (BDOS #6) un- 
der CP/M-80 returns a null flag if no 
character is available. CP/M-68K 
waits for a character. A status check 
is performed first, and if a character 
is ready, it is fetched and returned to 
the simulation. Otherwise just a null 
status is returned. 

4. Any call referencing an address 
(DMA or otherwise) needs to have that 
address translated to point into the 
8080's code buffer. (This is a problem 
inherent to the simulation because 
the 8080 buffer cannot be placed in 
system memory at address 0.) 

Some instruction simulations don't 
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do what you think they might. Spe- 
cifically, the EI and DI instructions do 
not translate to the equivalent 68000 
sequences. The object of using DI/EI 
pairs in an 8080 program is to pre- 
vent time-critical code from being in- 
terrupted or to prevent resource con- 
tention between interrupt routines 
and background processes that share 
resources. Because there are no 8080 
“interrupts” possible under COM, 
there is nothing to block. (We won't 
even talk about simulating time-criti- 
cal code!) 


A few Z80 simulation routines are 
used in COM because of the overflow / 
parity flag problem discussed below. 
These are just an extension of the ta- 
ble approach used for the 8080—a 
large jump table and a bunch of sub- 
routines. Extension to a full Z80 simu- 
lation is straightforward but would 
require a lot of code if the present 
jump table technique is kept. 

Another approach to simulating 
instructions involves dividing the op- 
codes into classes, e.g., all MOVs han- 
dled by one subroutine that figures 





> “Offers many capabilities for a reasonable price” <; 
os W. Hunt, PC Tech Journal oe 
o “I highly recommend the |C; UTILITY LIBRARY” o/ 

; D. Deloria, The C Journal . 
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of examples. Demo 
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more. 
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~ 8080 SIMULATOR 
(Continued from page 77) 


out what to move where by examin- 
ing the opcode in further detail. 
Though this is much smaller code- 
wise than having the 63 similar sub- 
routines that I used, it also suffers a 
speed penalty that I just couldn't tol- 
erate. I didn't buy a 68000 just to slow 
it down! 


Known Faults 

There are two problems with the sim- 
ulation of the 8080's flags. The first is 
that the flags are more like those of 
the Z80 than the 8080 in that the pari- 
ty flag reflects overflow status after 
arithmetic operations rather than 
parity. This fools some dynamically 
selected run-time packages such as 
the one used for BDS-C. There is mini- 
mal Z80 support in COM to handle the 
few extra instructions that BDS-C 
wants to use (LDIR and LDDR) so that 
programs compiled by it will run. 
(CPIR was also required by another 
program for the same reason.) This 
Z80 support could be extended as 
much as needed—up to and includ- 
ing full Z80 simulation. 

The other flag problem is with the 
half carry bit. Simulating it would 
take a lot of overhead because there 
is no similar flag in the 68000. There- 
fore, assuming the only need for the 
flag is for the DAA instruction, this in- 
struction is treated specially. Instruc- 
tions that set the half carry bit mean- 
ingfully (ADDs, ADCs, and INR As) have 
additional code to store away the two 
operands and Cy (if used) in special 
locations. The DAA simulation then 
recreates the HCY bit out of these 
stored values. A problem can arise 
when the flags are pushed and then 
pulled before the DAA is executed— 
an incorrect HCY is created if another 
addition-type operation occurs while 
the flags are supposedly saved. In 
practice, I only ran into this problem 
when using the 8080 DDT to trace 
through a DAA instruction. Be fore- 
warned. If required, the simulation 
could be extended to eliminate this 
problem by proper simulation of the 
HCY bit, but this would slow the 
arithmetic routines down quite a bit. 

BIOS calls to the disk drivers aren't 
allowed. I did this for safety reasons 
more than anything else—I did't 
want possibly buggy simulations 
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playing with my hard disk without 
the protection of my BDOS. This limi- 
tation could easily be removed. 

BDOS call #31 (Get DPH address) isn't 
supported. I didn’t need this for any 
program I wanted to use so it was left 
out. Including it would involve get- 
ting the table from the 68000, copying 
it to somewhere where the “8080” 
could find it, and then returning a 
pointer to this copy of the table. Simi- 
larly, function #27 (Get ALLOC vector) 
isn't supported either. Using either of 












ORG 0 


WARMST: JMP BIOS 






ORG 5 
JMP BDOS 





ORG OFFOOH 
HLT 

DBO 

RET 


BDOS: 









JMP WBOOT 
JMP CONST 
JMP CONIN 
JMP CONOUT — 
JMP LIST 

JMP PUNCH 
JMP READER 
JMP HOME 
JMP SELDSK 
JMP SETTRK 
JMP SETSEC 
JMP SETDMA 
JMP READ 
JMP WRITE 
JMP LISTST 
JMP SECTRN 


BIOS: 





















WBOOT: HLT 
DB 1 


RET 













HLT 
DB2 
RET 




















HLT 
DB 3 
RET 












CONOUT: HLT 
DB 4 


RET 






HLT 
DB5 
RET 





Table 1 


these calls will cause an abort and an 
appropriate error message. 

The IOBYTE and LOGIN vectors at 3 
and 4 aren't supported. 

Only one parsed FCB is supplied in 
the 8080's base page. The normally 
present second name at $6C isn't 
parsed. (Note that CP/M-68K parses 
two full FCBs when COM is invoked. 
The first is the name of the .com pro- 
gram to run, and the second is used 
as this program’s first FCB. CP/M-80's 
second ‘‘FCB”’ isn’t one—it is only an- 


; Service request. 
: 0 is BDOS call, else BIOS. 


; Service Request 
- Passed to 68K BIOS (BIOS #1) 


; BIOS #2 (etc.) 
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other name field in the first FCB. I 
didn't find anything that needed it, 
so I didn’t go to the trouble of picking 
another name out of the 68K’s com- 
mand tail.) 

An additional complication inher- 
ent to the simulation arises when you 
try to use programs running under 
COM to drive DMA devices. The hard 
disk controller in my system is a Mor- 
row HD/DMA. In order for the 8080 
simulation to be able to drive this con- 
troller, all addresses passed to the 


(Continued from page 78) 


SELDSK: 


SETTRK: 


SETSEC: 


SETDMA: 


LISTST: 


SECTRN: 


Table 1 
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board’s DMA circuitry must undergo 
translation so that they point to the 
buffers in the “8080” program space, 
not the 68000’s! Handling this tends to 
require a lot of code specific to each 
device supported, but it can be done. 
(COM was originally written for two 
reasons: to develop firmware for the 
8085 used in my system's keyboard 
and to run the Morrow FORMATMW 
(hard disk formatter] program. Trac- 
ing this program pointed out the er- 
ror in the HD/DMA documentation 


; Normally blocked by 
; the simulation. . 


; Ditto, etc. 


; This one is allowed. 





that kept my own formatting pro- 
gram from working.) There is a condi- 
tional assembly flag in COM to include 
the support for the Morrow control- 
ler. You probably will never want 
this option, but I left the code in to 
serve aS an example of extending 
COM to support a DMA device. 


8080 Environment 
The 8080 Environment is a 64K buff- 
er, of which all but 512 bytes are 
available as TPA. This is probably the 
only real advantage of the simulation 
over real execution. The fake BIOS/ 
BDOS (FDOS) starts at 8080 address 
$FFOO and is in the form of a jump 
table followed by a service request ta- 
ble. The warmstart and BDOS jumps 
in the low page of the buffer point to 
these tables. There is no CCP because 
COM takes its place. The 8080 form of 
the FDOS is shown in Table 1 (page 78). 
The service request handler per- 
forms a BIOS call to the 68000 if the 
parameter following HLT is not zero 
or a BDOS call if the parm is zero. In 
either case the appropriate parame- 
ters from the fake 8080 registers are 
translated (if required) and passed to 
the 68000 FDOS. The return values are 
then translated (if required) and 
stuffed into the 8080’s pseudoregis- 
ters, and the simulation is continued. 


Using COM 

CP/M-80 programs are run by insert- 
ing the word COM in the normal com- 
mand line. Examples of use are: 


A>COM WS TEST.ASM 

A>COM MAC TEST 

A>COM LOAD TEST 

A>COM DDT TEST.COM 

A>COM LU -O JUNK -A TEST.COM 
A>COM LDIR JUNK 

A>COM MBASIC FFT.BAS 


COM may be assembled with sever- 
al optional trace facilities. Normally I 
create a separate version called 
COMT because the presence of the 
trace code slows down the simula- 
tion. A trace is specified by giving the 
full normal command line and then 
answering the prompts for the start 
and stop trace addresses. COMT will 
check each address before it simu- 
lates the opcode at that address for a 
match with either of the two limits 
and turn on or off the register dump 
appropriately. An example is shown 
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8080 SIMULATOR 
(Continued from page 79) 


in Table 2 (page 81). The tracing ad- 
dresses in this figure will trace every 
BDOS call made by the program. 

The code for address prompting is 
rather stupid—it doesn't use line- 
buffered I/O. Because I almost never 
use tracing now that COM works, I 
didn’t bother to fix this up. (The code 
was pulled out of my ROM monitor, 
where I didn’t necessarily have any 
RAM for a buffer, which explains its 
strange structure.) 

Other tracing code may be includ- 
ed in COMT. There is support for 
dumping (to the printer) FCB calls to 
the BDOS and for including a register 
dump at this time. All of these trace 
options were useful in debugging the 
simulation. You probably won't need 
them, but they illustrate one advan- 
tage of the simulation over the real 
thing—you can monitor events at any 
level of detail you want, provided you 
don’t need real-time execution. 


Teaching the Assembler 
Tricks (With a Hammer) 

This section describes some of the 
tricks I used to make the ALCYON as- 
sembler (AS68) that is distributed 
with the CP/M-68K package do what I 
wanted when writing COM. Also de- 
scribed are some other tricks that I 
have used successfully in other as- 
sembly programs. (AS68 is also the as- 
sembler distributed with the Atari 
520ST developer's package.) 

At the beginning of Listing One are 
the register definitions used by COM. 
The form of these definitions was 
picked out of the AS68INIT file that 
you use the first time you run AS68. 
These definitions allow you to refer 
to the 68000 registers with more 
meaningful names than just “D3” and 
so on. The only real disadvantage of 
using names is that it is easy to forget 
which registers are in use and acci- 
dentally use one as a temporary that 
should have been saved first. Proper 
documentation helps in this. You also 
cannot use these new names in a 
“reg’’ directive. 

One problem with these names 
(and all other ‘‘equ’”’ defined symbols) 
is that you can’t define them as glob- 
al and use them in another file. The 
declarations must be repeated in 
each source file. 
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Because of the conditional assem- 
blies in COM, I needed to place some 
labels on lines by themselves, partic- 
ularly MLOOP, the main looping point 
of the opcode simulation. Though 
the assembler allows this (provided 
you put a colon after the label), I was 
unable to make the label global using 
the “.globl” directive. However, if 
you do something like this: 


glob] mloop 

mloop: 

~~ mloop: = ;Why?Idon’'t know! 

you can get the declaration to work. 

This trick was found by examining 

the code produced by the C compil- 

er. I believe that if the label is in up- 

percase you dont need this extra 
statement. Note that 


glob] mloop 
mloop: equ* 


won't work because of the problem 
with ‘equ’ described earlier. 

The “offset” directive is extremely 
useful for generating data storage ar- 
eas to be used with indexing. It would 
have been useful in COM, but it 
doesn’t work. “Equ’” must be used, 
and the programmer must count 
bytes in the storage areas to make 
sure nothing overlaps. Grrrrr. “Off- 
set’ wasn't accepted by the CP/M-68K 
Release 1.1 assembler. The Release 1.2 
assembler works just fine—but nei- 
ther linker will accept symbols de- 
fined in offset sections. Another ‘‘fea- 
ture’ to fix. Doesn't DRI test anything? 

Another trick that may be useful in 
68000 assembler programming is us- 
ing the “.opd” directive to generate 
your own opcodes. These are partic- 
ularly useful as stand-ins for less 
meaningful “‘.dc.w constant’ se- 
quences when generating data ta- 
bles, although you may define in- 
structions also. COM uses this trick to 
define the 68000’s BDOS and BIOS trap 
instructions. Look at the file AS68INIT 
for more examples of its use. The 
only restriction for use is that the 
new opcode must follow the address- 
ing rules of one of the existing 68000's 
instructions. Oh, for a true macro 
assembler... . 

The C preprocessor, CP68, may be 
used as a poor man’s macro assem- 
bler. If the assembly file (let's say 
TEST.MAC) looks something like this: 
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A>COMT TEST 





- Start trace - Sere 
Stop tr se at 





-AF-_ -BC- -DE- HL: “SP G0 Si 62 65. fC op - 
2300 4509 0200 0000 FFFE 0000 0000 0005 ~C3. UMP ‘FOO 
AR 8G) DE. oH Sr <0. 51 8 oe PO ep 
2300 4509 0200 0000 FFFE 0000 0000 0000 0000 FFOO 76 HLT 
Printed by BDOS #9 . . | 

-AF- -BC- -DE- “HL -SP- -SO- -S1- -S2- -S3- -PC- oe 

2300 4509 0200 0000 FFFE 0000 0000 0000 000 TSE co RET 

A> - — : - 








Table 2 













OF ARTIFICIAL, 
INTELLIGENCE 


PROLOG V 


Interpreter for MS-DOS/PC-DOS 


At last! A Prolog with enough muscle to handle 
real-world applications for UNDER $100! Discover 
why Japan has chosen Prolog as the vehicle for their 
“Fifth Generation Machine” project to design 
intelligent computers. 


CHOOSE FROM TWO GREAT VERSIONS: 


ROLOG V-Flus) PROLOG V 
$9995 $6995 


0 More Than 100 Predefined 0 70 Predetined Predicates 
Predicates 0 Small Memory Model 

0 Large Memory Model (to 640K) 0 Integer Arithmetic 

0 Floating Point Arithmetic 0 122-Page User's Manual 

0 150-Page User's Manual and and Tutorial 
Tutorial plus Advanced 
Programming Documentation 

0 Co-Resident Program Editor str 

9 Calls to Co-Resident Programs 

0 Text and Graphic Screen 
Manipulation 


STANDARD FEATURES ON BOTH: 

0 Clocksin & Mellish-Standard 0 Dynamic Memory Management 
Edinburgh Syntax. (garbage collection) 

0 Extensive Interactive Debugging 0 Custom-Designed Binder 
Facilities and Slipcase 


THE CHOICE OF UNIVERSITIES 

Generous university site licenses and an excellent teaching tutorial and 
reference guide have made PROLOG V the choice of universities nationwide. 
Call for details. 


: ‘PHONE ORDERS: 1-800-621-0852 EXT 468 sume » 
s (0 PAYMENT ENCLOSED $ 
Se CA residents add 6% sales tax 


“CO CHARGE MY: 





at our risk for 30 days. If 
not fully satisfied return - 
with disk still sealed for 
full refund. 


















E O MasterCard O Visa ae fay i and 
30 plus $10 Handling 
Card No. Exp. Date 
. SHIPPING: 
: Signature. $ ae — 3 
nada 
 Mr./Mrs./Ms. 10.00 Camibean, CHALCEDONY 
/ ful awaii Air 
. fiddrese ee oe 20.00 Overseas Air , SOFT WARE 
e COD Orders Not Accepted S580 LA JOLLA BLVD. 





SUITE 126 D 
LA JOLLA, CA 
92037 

(619) 483-8513 


os City / State /Zip 15 day check clearance 
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How to go 
om 
UNIX to DOS 
without 


compromising 


your 
Standards. 


It’s easy. Just get an industry standard file access 
method that works on both. 

C-ISAM™ from RDS. 

It's been the UNIX” standard for years (used in 
more UNIX languages and programs than any other 
access method), and it’s fast becoming the standard 
for DOS. Why? 

Because of the way it works. Its B+ Tree index- 
ing structure offers unlimited indexes. There’s also 
automatic or manual record locking and optional 
transaction audit trails. Plus index compression to 
save disk space and cut access times. 

How can we be so sure C-ISAM works so well? 

We use it ourselves. It’s a part of INFORMIX® 
INFORMIX-SQL and File-it!" our best selling data- 
base management programs. 

For an information packet, call (415) 322-4100. 
Or write RDS, 4100 Bohannon Drive, Menlo Park, 
CA 94025. 

You'll see why anything less than C-ISAM is just 
a compromise. 


o~\ 


oO 


RELATIONAL DATABASE SYSTEMS, INC. 


© 1985, Relational Database Systems, Inc. UNIX is a trademark of AT&T. INFORMIX is a registered 
trademark and RDS, C-ISAM and File-It! are trademarks of Relational Database Systems, Inc. 
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8080 SIMULATOR 
(Continued from page 81) 


#include ‘‘MACRO.H” 
label testmac(1,2,3) 
end 


and the file MACRO.H looks like this: 


* File produced by using CP68 as a 
macro 

assembly preprocessor on a .MAC 
file. 


* 


#define testmac(x,y,z) dc.w x \ 

.dc.w y \ 

.dc.w Z 
and if the files are processed like this: 
A>CP68 TEST.MAC TEST.'S)  ; CP/M 1.1 
or 


A> CP68 -P TEST.MAC TESTS ; CP/M 1.2 


then the output file (TEST.S) will look 
like this: 


* File produced by using CP68 as a 
macro 

assembly preprocessor on a .MAC 
file. 


* 


OF ae 

rae 

Ch 

label .dc.w 1 
.dc.w 2 
.dc.w 3 
end 


The <cr> lines are additional 
blank lines, one for each of the lines 
of a #define in the |H file. 


Notes 
The principal reference for the 8080 
model was the MCS-80/85 Family Us- 
ers Manual by Intel Corporation. 
This program is released to the 
public domain with the stipulation 
that it be used for noncommercial 
purposes and that appropriate credit 
be given in any upgrade. 


DDJ 


(Listings begin on page 104) 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 5. 
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[extra support, personal service, com- 
petitive prices. 
Disclone full service quality tested diskette 
duplication, packaging, documentation produc- 
tion and processing ensures precise duplica- 
tion, thorough quality control, and expedient 
response to your requirements. 
NOclone state of the art hardware based copy 
protection is true piracy protection for author- 
ized allotments only. Each application is 
uniquely encrypted. Install routines are coded 
for nontransferrable hard disk allotments. 
Committment dates are guaranteed. Fast 
turnover 

w up to 1000 in 24 hours, any format. 

@ up to 10,000 in one week, any format. 


CAE 


DISCLONE SOFTWARE PRODUCTION SERVICES 


1585 North Fourth Street, San Jose, California 95112 
(408) 947-1161 OUTSIDE CA: 1-800-826-4296 
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File System 


~All products are written entirely in K& RC. Source 


— Vee 


~e~Duplicate keys, variable‘length datarecords’" °°" 


Full Documentation and Example ‘Programs h 


‘For more information call or write: _ 





C-PROGRAMMERS 












code included, No Royalties, Powerful & Portable. 


Cra 759° 








“© High speed random and sequential access. 
e Multiple keys per data file with up to 16 million records per file. 





© Greatly speeds application development. 
*~Combines ease’ of use of database’ manager with ‘flexibility of program: ~~ 

ming language. : : 
¢ Supports multi_key. files and dynamic. index definition. ooo. cocoon oommmmon 


® Very easy to use. | 
! Spake t a alge Be OSC Re 1 










® Patterned after the UNIX utility, be 
© Works for programs written in every language. 
e Full macros, File name expansion and built in rules. 











Vraah Saban bine — : 
Oakville, Ontario, Canada 
Secbephere Dre) reece fn ic i 
(416) 825-0903 


(416) 844-2610 


- Dealer inquiries invited. - 

















Credit cards accepted. 





WINDOWS FOR DATA‘ 


Featuring One-Step Data Entry°®* 


Now you can code fast, powerful data 
entry windows, improve user 
convenience — reduce input errors. 


All the power, convenience and 
flexibility of the #1 window utility for 
the IBM PC. Our WINDOWS FOR C™ 
combined with a professional window- 
based data entry system. 


Complete control over screen display 


and entry of data within a convenient 
flexible window environment. 


WINDOWS FOR C WINDOWS FOR DATA 
(Includes WINDOWS FOR C) 


PCDOS $195 $ 295 
PC/XENIX $ 395 $ 595 
UNIX CALL CALL 





WINDOWS FOR DATA™ provides versatile, 
easy-to-use data entry functions that operate 
within windows. | 


CAPABILITIES INCLUDE: 


= Pop-up data entry windows 

= Multiple field types 

= Data validation functions 

= Field-specific & context-sensitive help 

= Lotus-style menu design 

= Single field entry option 

= Date, time and string utilities 

= Dynamic control of data-entry 
environment 

User input to data-structure variables 

without intervening code. 


21 Elm Ave. 
Richford, VT 05476 
802-848-7738, ext. 31 


Full source available. Master Card & Visa accepted. Shipping $ 3.50. VT residents add 4% tax. 
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Byte Magazine called it. 


“CIARCIA’S 
SUPER 
SYSTEM’ 


The SBI80 
Computer/Controller 


Featured on the cover of Byte, Sept. 1985, 
the SB180 lets CP/M users upgrade to a 
fast, 4’ x 7%” single board system. 





e 6MHz 64180 CPU 
(Z80 instruction superset), 256K RAM, 
8K Monitor ROM with device test, disk 
format, read/write. 

e Mini/Micro Floppy Controller 
(1-4 drives, Single/Double Density, 
1-2 sided, 40/77/80 track 3%} 5%"’ 
and 8” drives). 

@ Measures 4’’ x 7%"’ with mounting holes 

© One Centronics Printer Port 

® Two RS232C Serial Ports 
(75-19,200 baud with console port 
auto-baud rate select). 

@ Power Supply Requirements 
+5V +/-5% @500 mA 
+12V +/- 20% @40mA 

® ZCPR3 (CP/M 2.2/3 compatible) 

@ Multiple disk formats supported 

e@ Menu-based system customization 





$B180-1 
SB180 computer board w/256K 
bytes RAM and ROM monitor 


Beas ce Maelo niisliaic ties a tatele tir teak $369.00 
$B180-1-20 

same as above w/ZCPR3, ZRDOS 

and BIOS source............. $499.00 


-Quantity discounts available- 


new 
COMM 180-M-S 
optional peripheral board adds 
1200 bps modem and SCS! 
hard disk interface. 


TO ORDER 
CALL TOLL FREE TELEX 
1-800-635-3355 643331 


For technical assistance or 
to request a data sheet, call: 


1-203-871-6170 


m 


Micromint, Inc. 
25 Terrace Drive 
Vernon, CT 06066 


“S 
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C CHEST LISTING 





(Text begins on page 18) 


#include 
#include 
#include 
#include 
#include 
#include 
#include 


SH. 


<stdio.h> 
<dir.h> 
<process .h> 
<errno.h> 
<fcntl.h> 
<signal.h> 
<dos.h> 


Cc; A shell for MSDOS. 


Copyright (C) 1985 Allen I. Holub. All rights reserved. 


This file contains an MSDOS shell that operates in conjunction 
with command.com. It has several built-in commands (see below). 
It recognizes several semi-colon seperated commands on a line 

& does wild card expansion. It can take commands interactively 
or from the command line (but command.com will intercept the 
re-direction if you have any on the command line). It supports 
simple batch files and will expand several $ arguments. 


It does not support redirection yet. 


Usage: sh [-cvx] <args> 

Invocation: 

sh 

sh -i shell entered in interactive mode. If -i is given 
any command line arguments that follow will be 
assigned to $0 $1 etc. $0 will point at the 
leftmost argument following the -i. 

sh -c <string> commands are read from string. If several strings 


sh 


sh 


sh 


sh 


are present they are concatanated together before 

execution. The 'c' may be upper or lower case. 
<file> args... commands are taken from <file>. Args are expanded 
to correspond to $0 $1 etc inside the file. For 
DOS compatability %0 %1 etc are also recognized. 
$0 will be <file> itself. 


-q Strip quotes from quoted argument strings. Usually 
they're left in so that a’ spawned process can 
assemble its argv correctly. 

-V Print input lines to the shell as they are read 
(same as “set verbose=1"). 

-X Print lines as they are executed. (same as 


saying “set echo=1" in the shrc.bat file. 


Enviornment variables: 

CMDLINE (set) Holds the complete, 2048 byte, command line 
that can't be passed via MSDOS. 

PROMPT (used) Defines the prompt string. Any character 
or $<arg> may be used. Default prompt is 
[$s:$p]. 

SHLEV (set) Current shell level (0 is outermost). Remember 
that batch files are executed in their own 
shell. 

SWITCHAR (used) Use first character in line to designate 
command line switches. 

Files: 
/shrce.bat Executed every time a shell is created. 
/login.bat Executed when a level 0 shell is created. 


/logout.bat Executed when “logout" command is executed 


Built in commands: 


alias [name [wordlist] ] 
cd <directory name> 
exit 

history 

logout 

pwd 

rem 

setenv <name> [=] <value> 
set {{cmd|echo|verbose|$arg} [= val]] 
shift 

unalias <name> 

unset <name> 

Yr) t<num| !<pat> 

A AA “<num> “<pat> 

'> [name] 

!< [name] 


Pre-defined shell variables (may use either % or $) 


$<num> one argument in batch file. $0 is file name. 
$* All the $<num>s concatantated with spaces between them. 
Sp Full path name of current directory. 


$! Current History number. 


Ss Nesting level of current shell. 0 is the outermost 


Special characters: 


: Used to delimit two commands on one line. 
*2 Name containing these is expanded to matching directory 
entry. 


Special characters aren-t recognized in quoted strings or 


when preceeded by a backslash. 
All lines with # in the left-most column are ignored. 
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108 */ 

109 

110 extern int access (char*, int ); /* in stdio library a} 
111 extern int bdos (int, int; int ); 

112 extern int chdir (char* )3 

113 extern int errno; 

114 extern FILE *fopen (char*, char* 

115 extern int fseek (FILE*, long, int ); 

116 extern long ftell (FILE* Ps 

117 extern char *getenv (char* is 

118 extern char *getcwd (char*, int ie 

119 extern char *malloc (unsigned 

120 extern int putenv (char* ); 

121 extern int (-*gignal (int, int(*) 0) )-)4) : 

122 extern int strlen (char* iE 

123 extern char *strpbrk (char*, char* ys 

124 

125 /* source is in: «/ 
126 extern char *cpy (char*, char* ); /* /src/tools/cpy.c ay 
127 extern void del dir (DIRECTORY * ); /* /src/tools/dir.c xf 
128 extern void dir (char*, DIRECTORY* ); /* /src/tools/dir.c x / 
129 extern char *efgets (char*, int, FILE*); /* /src/tools/efgets.c */ 
130 extern DIRECTORY *mk dir (int ).: #* \fere/ta6le/dir.c “7 
131 extern char *next (char**, --int, int ):. /* ‘/sre/tools/next.c */ 
132 extern char *skipto (int, char*, int ); /* /src/tools/skipto.c */ 
133 extern char *strsave (char* ); /* /src/tools/strsave.c */ 
134 extern int unargv (int,char**,char*,int,int); /* /src/tools/unargv.c */ 
135 

136 extern void unsetvar( char* ); {* './ var sce */ 
137 extern int setvar( char*, char* ); 

138 extern void printalias(); 

139 extern void printvars(); 

140 extern int getvar(char**, char**, int*); 

141 

142 extern void print_hist (FILE*); /*)./Rist.c ay 
143 extern int get_hnum(); 

144 extern void history( char*, int); 

145 

146 /*---------------------------------------------------------------------- */ 
147 

148 #ifdef DEBUG 

149 static int Lev = -1; 

150 # define TRACE (p) printf ("%*s{ entering %s\n" ,++Lev * 4, "", p) 
151 # define END _TRACE(p) printf("%*s} exiting %s\n" ,Lev-- * 4, "", p) 
152 # define DIAG(f,a) printf (f,a) 

153 #else 

154 # define TRACE (p) 

155 # define END_TRACE (p) 

156 # define DIAG(f,a) 

157 #endif 

158 

159 

160 #ifdef STR_CMDS 

161 # define PSTR(subr,str) printf("%s <%s>\n", subr, str); 

162 #else 

163 # define PSTR(subr, str) 

164 #endif 

165 

166 /*---------------------------------------------------------------------- */ 
167 

168 #define VER a0" /* Version number */ 
169 

170 #define DOSMAXLINE 127 /* Maximum line number permitted by DOS ay 
171 #define MAXLINE (2048+1) /* Largest input command line in bytes +1 x/ 
172 #define MAXDIR 128 /* Largest number of objects on cmd line ef 
173 #define CNTL Z ge *s 

174 #define COMMENT ‘#! /* Deliniates comments */ 
L75 

176 #define ISQUOTE (c) ((c)—=—P"" fT] (c)mmt\ i!) 

177 #define ISWHITE(c) ((c)—==' § |] (c)m=*\t!) 

178 #define SKIPWHITE (p) while( ISWHITE(*p) ){ ptt; } 

179 #define ISVAR(c) ( (c)—'S' [|] (c)——'S! ) 

180 

181 /* Possible modes in which shell can operate x / 
182 #define FILEMODE 0 /* Get input from a file ay 
183 #define INTERACTIVE 1 /* Get input interactively from stdin a] 
184 #define COMMAND 2 /* Get input from the command line */ 
185 

186 #define PMODE() ( Mode==COMMAND ? "COMMAND" : \ 

187 (Mode==FILEMODE ? "FILE" ;: “INTERACTIVE") ) 

188 

189 /*---------------------------------------------------------------------- 
190 * Token definitions for built-in commands. 

191 */ 

192 

193 typedef enum 

194 { 

195 ALIAS, 

196 CD; 

197 CMD, 

198 EXIT, 

199 HISTORY, 

200 LOGOUT, 

201 PWD, 

202 REM, 

203 SET, 

204 SETENV, 

205 SHIFT, 

206 UNALIAS, 

207 UNSET 

208 } TOKEN; 

209 

210 /*--------------------------------------------------------------------- 
aa | * Global variables: 

212 */ 

ZS 

214 static char** Numv ; /* Vector array for expanding $<num> vars x] 
215 static int Numc = 0; /* count of valid entries in the above =f 
216 static char Ibuf[(MAXLINE]; /* Input buffer xy 
217 


(Continued on next page) 
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UTILITIES 


FOR 


Tirho Pascal rocrammers 






Improve Code Performance 
Find Subtle Bugs 
Automate Tedious Tasks 





Supports Turbo Pascal 2.0 & 3.0 
IBM PC/XT/AT & True Compatibles 
PCDOS 2.X & 3.X 

192K RAM DSDD Drive 







If You Really Use Your 
Pascal Compiler You Need 
These Tools! 








e Pretty Printer 
e Pascal Structure Analyzer 
¢ Execution Profiler 

e Execution Timer 





Advanced Text Processing 
& Command Automation 








e Pattern Replacer 
e Difference Finder 
¢ Command Builder 
e File Finder 

e Super Directory 





Where Else Can You Get 
500K of Integrated, Useful, 
Tested, Fully Documented 

Source Code for $95? 





¢ 140 Page Printed User Manual 

¢ Quick Reference Card 

¢ Detailed Programmer’s Manual on 
Disk 

¢ Complete Turbo Pascal Source Code 

¢ 6 Bonus Utilities with Source! 

e Tax & U.S. Postage Included 

e Executable only version $55 











MC/Visa Orders TOLL FREE 
(USA) 800-538-8157 x830 
(CAL) 800-672-3470 x830 

Brochures, Questions, PO’s 

call 408-378-3672 _ 
Checks or Money Orders 
TurboPower Software 


478 W. Hamilton Ave., Suite 196 
Campbell, CA 95008 U.S.A. 





INTERNATIONAL REPRESENTATIVES — 
Switzerland: Software Haus 064-512651 
Japan: Southern Pacific Ltd 045-314-9514 
England: The Core Store 0606-45420 
Canada: Software Commodities 416-865-1600 
Holland: SCOS PC-Center 020-106922 
Norway: Polysoft 03-82575 


Turbo Pascal Is a Trademark of Borland International 
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LOOKING FOR AT 
PREFORMANCE 
YOUR PC? 






C CHEST LISTING 


(Listing Continued, text begins on page 18) 










FROM 218 static int Cmd = 1; /* Generate CMDLINE env with spawned proc */ 
N 219 static int Switchar ='-'; /* Designates command line switches df 
aun 220 static int Verbose = 0; /* Print input lines as they're read -v */ 

f 221 static int Echo = 0; /* Print commands as they're executed -x */ 
222 static int Noquotes = 0; /* Strip " or ' from quoted args ag*/ 
223 static int Shlev = -1; /* Nesting level of the current shell x / 
224 static char *Filename = 0; /* Full path name of file specified in */ 
225 /* Filemode input. a 
226 
227 /*----------------------------------------+------- +--+ +--+ - +--+ ---------- 


228 * Set up input mode for file mode processing. Note that Last posn and 
229 * Ateof are used by file input(). 7 

230 */ 

231 

232 char *file input (); 
233 static int Mode 

234 static char *(*Ifunct) () 
235 static long Last_posn 

236 static int Ateof 

237 

238 reset _fileinput () 
Za>y { 

240 Last_posn 
241 Ateof 

242 Mode 

243 Ifunct 
244 } 

245 

246 /*---------------------------------------------------------------------- 

247 * Making isdigit into a subroutine makes processing marginally 

248 * easier in exp vars (below). 

249 */ 

250 | 
251 digit (c) 

202; { 

253 return( 'O0'<=c && c <= '9' ); 

254°:,}3 

nos 

256 /*---------------------------------------------- ------- +--+ ------------- 
257 Input functions: interactive input () Gets input from keyboard 
258 command input () Gets input from cmd line 
259 file input () Gets input from a file. 
260 
261 
262 
263 
264 
265 
266 
267 /*---------------------------------------------------------------------- */ 
268 

269 char *interactive input () 

270 { 

271 register char *rval = NULL; 

2 hz. 

273 TRACE ("interactive input") ; 

274 

Ailes *Ibuf = 0; 

276 if( efgets(Ibuf, MAXLINE, stdin) ) 

Zt? rval = Ibuf ; 

278 

279 END_TRACE (“interactive input") ; 

280 return rval; 

281} 

282 

283 /*- -------------------------------- -- */ 
284 

285 char *command_input () 

286 { 

287 static int have _been called = 0 ; 

288 register char *rval = NULL ; 

289 

290 TRACE( “command input" ); 

291 

292 if( !have_been called ) 

293 { 

294 unargv(-Numc, Numv, Ibuf, MAXLINE, ' ' ); 

295 rval = Ibuf ; 

296 have been called++; 

297 } 

258 

299 END_TRACE( “command_input"™ ); 

300 return rval; 

301 } 

302 

303 /*e- -- ------------------ -- -- -- - - - - - - -e */ 
304 

305 char *file input () 

306 { 

307 / 
308 

309 

310 

sack 

342 

=P amen eee 313 

314 

315 register char *rval = NULL ; 

316 register FILE *fip: 

317 

318 TRACE( “file input" ); 

329 "¢ 

320 if( !Ateof ) 

321 { 

322 if( !(fp = fopen(Filename, "r")) ) 

323 fprintf(stderr,"Sh: Can't open batch file <%s>\n", 
324 Filename) ; 


F ILEMODE ; 
file input ; 
OL ; 
O33 


OL ; 
0 ; 
F ILEMODE 
file input 






& ESE 
@EARTH HAS IT FOR 
LESS THAN $1,000! 


YOUR SEARCH IS OVER!! EARTH 
COMPUTERS’ exciting new _high- 
speed, 80286 accelerator’ card, 
. TurboACCEL-286™, is just what you’ve 
been looking for. The TurboACCEL- 
Q: will boost your PC performance up 






Only one of the three will be used depending on the way that 
the shell was invoked. All three return 0 on end of input, a 
pointer to the beginning of the current input line on success. 
The input line will have been loaded into the global array 
Ibuf, which is assumed to be dimensioned to MAXLINE characters. 


to Five times...its completely software 
transparent...and its only $995! 
TurboACCEL-286 will fuction with 
most operating systems and application 

programs (unlike other’ so-called 
accelerator boards). 





The TurboACCEL-286 features a 
high-speed, 8MHz, 80286 processor, 
512Kbytes of RAM (expandable to 
1 Mbytes), a switch for 8088 operation, 
and facilities for an 80287 math co- 
processor. It occupies one expansion 
slot, is completely compatible with 
most PCs and is software transparent. 
End your search for AT performance. 
Order the TurboACCEL-286 today! 


Call or write: 












Get input for file mode. This kludge is required because 
a child process will close any open files when it exits. 
Consequently we open the file, get a line, remember 

the position within the file, and then close the file 

on each call. On the next call we'll return to the 
position we remembered in the previous call. 






+ + + + 4 H 


/ 


P.O. Box 8067, Fountain Valley, CA 92728 
TELEX: 910 997 6120 EARTH FV 


(714) 964-5784 


Ask about EARTH COMPUTERS’ other 
fine PC and S-100 compatible products. 
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325 
326 
327 
328 
329 
330 
331 
332 
333 
334 
335 
336 
337 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
- 349 


} 


else if( !fseek(fp, Last_posn, 0) ) 


/* Get a line from the buffer. Note that if the 
* file doesn't have it's last line terminated 
* with a carriage return, efgets will return 
* true even though we're at end of file 
* thus the call to feof. 

*/ 


*Ibuf = 0; 
rval = efgets(Ibuf, MAXLINE, fp) ? Ibuf : 
if( !(Ateof = feof(fp)) ) 

Last_posn = ftell( fp) - 1; 
fclose( fp ); 


NULL ; 


END _TRACE( "file input" ); 
return( rval ); 


int has_wild( bp ) 


register char 


350 { 


351 
352 
353 
354 
355 
356 
357 
358 
359 
360 
361 


363 
364 


/* 
* 


for(; 


*bp; 


Return true if the string has a * or ? in it 


*bp ; ++bp) 


if( *bp == '*!' || *pp == '2!' ) 
return 1; 


return 0; 


} 


ee FOF oe we ne re re we ee ee ee we x/ 


int strip( sre ) 


register char 


365 { 


362 
366 
' 367 
368 
369 
370 
371 
372 
373 
374 
375 
376 
377 
378 
379 
380 
381 
382 
383 
384 
385 
386 
387 
388 
389 
| 390 
391 
| 392 
| 393 
| 394 
395 
396 
397 
398 
399 
400 
401 
402 
403 
404 
405 
406 
407 
408 
409 
410 
411 
412 
413 
414 
415 
416 
417 
418 
419 
420 
421 
422 
423 
424 
425 
426 
427 
428 
429 
430 
431 
432 
433 
434 


/ 


register char ‘*dest 
nt 


+4 t+ 4+ HH & 


*src; 
Take care of special characters in a string (* and 2). 


Copy src onto itself, stripping out back-slashes. If a 
* or ? which isn't preceeded by a backslash is found 
return 1, else return 0. If the first character in the 
string is a quote then * and ? aren't special. 


= src; 
special = 0; 


TRACE ("strip"); 


while( *srec ) 


{ 


} 


if( *src == '\\' ) 
{ 
/* Copy the char. following the \ into 
* dest and then, if we aren't at end of 
* string, advance sre to point past the 
ere character 
* 


*dest++ = *++src; 
if( *sre ) 
t+Sre; 
) 
else if( ISQUOTE(*src) ) 
{ 


/* Copy a quoted string verbatum, removing 
* the quotes if Noquctes (-q) was given on 
* the command line. 

*/ 


if( Noquotes ) 
+¥8XC ; 


while( *src && !ISQUOTE(*src) ) 
{ 
if( src[0) == '\\' && srce[1)} ) 
*dest++ = *srct+; 


*dest++ = *srct++ ; 


} 
if( *sre ) /* Then *src is a quote */ 
{ 
if( Noquotes ) 
srctt; 
else 
*dest++ = *srctt+ ; 
else 


/* Just do the copy. Set special to true 
* if we copy a special character. 

w/ 
if( *src == '*!' || *sroq == '2! ) 


special = 1; 


*destt++ = *srctt+; 


*dest = '\O0'; 


END_TRACE ("strip"); 


(Continued on next page) 
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Put More 
UNIX” in 
Your C. 


KH. 
m 

Unitools $99 “ _ 
MAKE, DIFF and GREP S$ W" 
These versatile UNIX-style utilities put 
power at your fingertips. MAKE, a 
program administrative tool, is like 
having an assistant programmer at your 
side. DIFF compares files and shows 
you the differences between them. 
GREP can search one or many files 
looking for one pattern or a host of 


patterns. i : 
(2 
| bditor 

“7 $99 eee re 


A Powerful “‘vi’’-type Editor: 

Similar to the Berkeley ‘‘vi’’ editor, 
**Z’s’? commands are flexible, terse, 
and powerful; macro functions give you 
unlimited range. Features include 
“undo,” sophisticated search and re- 
place functions, automatic indentation, 
C-tags, and much, much more. 





PC-LINT $99 
Error Checking Utility PE ee 
A LINT-like utility that andlvresp pro- 
grams and uncovers bugs, quirks and 
inconsistencies. Detects subtle errors. 
Supports large and small memory mod- 
els, has clear error messages and 
executes quickly. Has lots of options 
and features that you wouldn’t expect 
at this low price. 





FASORS 
oan 
SunScreen $99 
Low-priced Screen Utility 
This versatile graphics package Bais 
creates and modifies formatted screens, 
validates fields, supports function keys, 
color and monochrome cards. With li- 
brary source SunScreen is $199. 


Compatible with all leading MS/ 
PC-DOS C compilers. 


SPECIAL are 
Unitools, * 

PC-LINT a Sun- 
Screen All for only 


To order or for information call: 


/GWAR 


1 800-TEC- WARE 


(In NJ call 201-530-6307) 


UNIX 1s a registered TM of Bell Laboratones, MANX AZTEC iad Manx Software Systems, Inc PC 
LINT ™ GIMPLE software. SunScreen TM SunTec. MS-DOS T’ crosoft 
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Introducing Periscope Il 


Professional Debugger C CHEST LISTING 


and Break-out Switch (Listing Continued, text begins on page 18) 


435 
New Peri- 436 return( special ); 
437 } 
scope I] 438 
439 /*---------------------------------------------------------------------- */ 
includes 440 
441 char *nextarg( lp ) 
a remote 442 char **1lp; 
443 { 
break-out 444 /* Get the next, space delimited, argument from the string 
445 x pointed to by *lp. Return a pointer to the argument and 
switch that 446 * update *lp to point past it. Leading white space is 
447 x skipped. 
does not 448 */ 
4 449 
need its 450 register char *start, *line = *lp; 
; 451 
own slot! 452 TRACE ("nextarg") ; 
453 SKIPWHITE( line ); 
454 
455 if( !*line ) 
456 start = (char *)0 ; 
457 else 
458 { 
459 start = linet+; 
460 
461 line = skipto( ISQUOTE(*start) ? *start : ' ', line, '\\'); 
462 
463 if( ISQUOTE(*line) ) 
464 line++; 
465 
466 if( *line ) 
° 44 : * = § § 
The break-out switch “‘really sets Periscope pe coer a 
apart from the typical software-only debug- 469 *lp = line; 


gers.’’” Hung system or locked keyboard? dia ; 


Press the switch to get control! END_TRACE("nextarg") ; 


Periscope’s symbol support “beats the day- at et ee 


lights out of snooping through a map file and 476 


. ai . . ae Pe ee a ee ee ae ae a a ee ee a a a a a a a ee ee reerrereereereeerevereeeee eee * 
making notes’. See high-level line numbers ae / 


de. too! 479 int exp dir( buf, maxcount ) 
and source code, too Ce oe en 


“Feel right at home’ in no time with com- oo 
mands that logically extend Debug’s! 483 
Periscope’s speed makes other debug- 5 
gers “look absolutely sluggish’’! It’s written 487 


entirely in assembler and uses DOS only = 


/ 
for file access. 490 
491 register DIRECTORY *dp = 0 ; 


492 register char targ, *sbuf, *p : 
493 int i, rval = 1; 

494 

495 TRACE ("exp dir"); 

496 

497 if( !(dp = mk_dir(MAXDIR)) ) 

498 goto abort; 

499 

500 dp->files 
501 dp->dirs 
502 dp->path 
503 dp->sort 
504 
505 
506 
507 
508 
509 
510 
SPL 
Siz 
SLs 
514 
S15 
516 


Periscope requires: IBM PC, XT, AT, or ay phrased ae bide arrteatdion i 
close compatible; DOS 2.0 & later; 128K 519 ae tO Ree PT ME ss ae eer, fee tt 


RAM; 1 Disk Drive; 80-column Monitor. az de strip(arg) ) 


Periscope II, break-out switch, manual, a i = dp->maxdirs; 
reference card and software... $145! 524 dir( arg, dp); 
525 
Periscope I also includes the write 526 if( dp->maxdirs <= i ) 
protected RAM board to protect crucia a { 
debugger code. It’s just $295! 529 
j 530 fprintf(stderr,"Sh: Can't expand <%s>\n",arg); 
The US Navy gets Periscopes from us aa rval = 0; 
... shouldn’t you? Order today! 533 ia a 
534 
‘ 535 1 
Order/Information Call Toll-Free: 536 cr 
537 / 


800-722-7006 ao $39 


540 
30-Day Money-Back Guarantee 541 














( Periscope is) ’ the best val ue i 
tools currently on the marke | 
essential element of my ‘developer: 












“Very powerful for debuggi ng and 
Better than Atron by far... —Wyn 






ttn 


be 


+ + + + HH OH 


Remake buf, expanding any wild card characters into 
their proper names. That is, if buf containg the string: 
"foo * bar" and the current directory contains the 
files A, B and C then on exit, buf will point 

at the string "foo a bc bar". Expanded entries are 
sorted. Return 0 if a wild card that couldn't be 
expanded was found, else return l. 


Has all the standard feature: 


e Debug with over 75 breakpoir 
New! Write your own breakpo 
New! Traceback == 
New! Do in-line symbolic ass 
e Debug using one or twom 
¢ Recall command lines 
New! Debug with high-level 
New! Redefine windows whi 
New! View text files while d 
e Debug device drivers, non- 
memory-resident programs 
New! Customize Periscope vie 
New! Display 8087/80287 s 
New! Use Periscope with an E 





















/* Get all files =] 
and all directories x/ 
/* and prepend the path name if given */ 
the list should be sorted */ 


| 

Pree 

oe Ye Ye Yo 
a 
* 


we 
Pin 
* 





™~ 
* 


Get the arguemts from the input src, one at a time, 
putting them into the dirv array of a DIRECTORY structure 
(one argument per dirv entry). 








If the argument has special characters (* or ? not 
preceded by a \ or enclosed by quotes) then expand to a 
directory using dir(), otherwise just put the argument 
into the dirv array directly. 





Buf will grow larger if anything is expanded but it 
won't get larger than maxcount. 


+ + + © & + HH H+ H+ HF F 


/ 


/* dir() didn't do anything */ 


Add a command to dirv. First malloc space 
for it. Then copy it the arg into the 
malloc()ed space & put it into dirv. 

We use malloc in order to make it easier 
to free the space used by the DIRECTORY 


+ + * H 


Data Base Decisions ¢ 404/256-3860 


14 Bonnie Lane @ Atlanta, GA 30324 
Circle no. 130 on reader service card. 
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542 
543 
544 
545 
546 
547 
548 
549 
550 
551 
552 
553 
554 
955 
556 


581 
582 


584 
585 
586 
587 
588 
589 
590 
591 
592 
593 
594 
595 
596 
597 
598 
599 
600 
601 
602 
603 


605 
606 
607 
608 
609 
610 
611 
612 
613 
614 


641 
642 


644 
645 
646 
647 
648 
649 
650 
651 
652 


abort: 


char 
char 


int 
char 


* structure. 
* / 


if(!( p = malloc( strlen(arg)+1 ) )) 
{ 


fprintf(stderr, "Sh: out of memory !!\n"); 
goto abort; 
} 


strcpy( p, arg ); 
*( dp->lastdir )++ =p; 


--( dp->maxdirs ); 
++( dp->nfiles ); 


} 
i = unargv(dp->nfilest+tdp->ndirs, (char **)dp->dirv,sbuf,maxcount,' '); 


if( dp->maxdirs <= 0 || i >= maxcount-1 ) 
fprintf(stderr, "Sh: command line too large, truncating\n"); 


if( dp ) 
del _dir( dp ); 


END_TRACE("exp dir"); 
return( rval ); 


*search( fname, ext ) 
xfname, *ext; 


/* Search for fname.ext in the current PATH. Return a pointer 
* to the full path name if you find it (0 if you don't). 
“/ 


static char  pathname[80]J, pbuf[129] ; 

register char ‘p : 

char *paths ; 

/* Assemble the pathname by concatanating fname and ext 
“/ 


TRACE ("search") ; 


if( strpbrk(fname, ".") ) 
ext = =; 


/* If file name already has an */ 
/* extension don't add another. */ 


sprintf( pathname, "%$0.32s.%0.3s", fname, ext ); 


if( access(pathname, 04) < 0 ) 
{ 

/* The file doesn't exist in the current directory. 
If fname contains the characters \ or / or if 
the PATH enviornment isn't set, return a NULL, 
else search for it along the path. strpbrk() is 
a microsoft and Lattice library function. It'll 
return true if fname contains a / ora \. 


+ + + + & % 


/ 


if( strpbrk(fname,"\\/") || 
*pathname = '\0!'; 


'(p = getenv("PATH")) ) 
else 
strncpy( (paths = pbuf), p, 129 ); 

ae p = next( épaths, ';', -1 )) 


sprintf(pathname, "$0.50s\\%0.20s.%0.3s", 
p, fname, ext); 


if( access( pathname, 04 ) >= 0 ) 
break; 
else 
*pathname = '\0'; 
} 


END_TRACE ("search") ; 


return( *pathname ? pathname : NULL ); 
a a a a a a a a a a oo ee x / 
execute( buf ) 
*buf; 
/* Execute a command. Return the programs exit status or 
* -1 if the program didn't execute. This routine assumes 
* that buf is at least DOSMAXLINE characters long. 
EY 
register int rval = 0; 
register char *name; 
static char envstr[MAXLINE+8] = "CMDLINE="; 
TRACE ("execute") ; 
PSTR( “execute(1) buf=", buf ); 
™ Create the CMDLINE environment variable if Cmd it true 
* (it can be set false with a “set cmd=0." If cmd is false 
x then generate a "CMDLINE=" with no argument. This is 
“3 necessary because MSDOS doesn't support a unset command. 
=f 
if( Cmd ) 


(Continued on next page ) 
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Work Smart 
with These Powerful 
C Utilities 


Get more value from your C system. 
Boost program quality and slash de- 
velopment time with these professional 


utilities for leading C-compiler systems. 
C Utility Library sjaS $155 
Over 300 C subroutines 


C and assembler source code and 
demonstration programs for screen han- 
dling, color printing, graphics, DOS 
disk and file functions, memory manage- 
ment and peripherals control. 


C-tree $395 $329 
B-Tree database system 

Store, update and retrieve records 
easily. High-level multi-key ISAM 
routines and low-level B-Tree 
functions. Available for MS-DOS, CP/ 
M-86, and CP/M-80. Easily transpor- 
ted. Adaptable for network and 
multiuser. Includes source. 


PHACT $3957 $200 
Data Base Record Manager 
Includes high-level features 


found in larger database systems. 
Available for MS-DOS, CP/M-86 


and CP/M-80. 

Pre-C $395 $329 
LINT-like source code analyzer 
Locates structural and usage errors. 
Cross-checks multiple files for bad 
parameter declarations and other inter- 


face errors. 


Windows for C $195°$165 
Versatile window utility 


Supports IBM PC compatible and some 
non-compatible environments. 


PANEL $295 $235 


Screen generating utility 

Create custom screens via simple, 
powerful editing commands. Select 
colors, sizes and types, edit fields. 
Includes direct input utility. 


HALO $260 $199 


Ultimate C graphics 
A comprehensive package of graphics 
subroutines for C. Supports multiple 


graphics cards. 
$395 $315 


PLINK-86 
Overlay linker 

Includes linkage editor, overlay manage- 
ment, a library manager and memory 
mapping. Works with Microsoft and 
Intel object format. 


To order or for information call: 


CWAR 


1 800 -TEC- WARE 


(In NJ call 201-530-6307) 


UNIX 1s a regstered TM of Bell Laboratones. C-tree, TM Faircom, Inc . PHACT TM PHAC T ASSOX 
Pred’. PLINK 86. TM PHOENIX, HALO TM Media Cybernetics, Inc . PC lint TM GIMPLE software 
PANEL TM Roundhill Computer Systems. Lid. WINDOWS FOR C TM Creauve Soluuons. CP M TM DRI 
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MetaScope: 
The Debugger 


MetaScope gives you everything 
you've always wanted ina 
debugger: 


@ Multiple Windows 
Open and close, move through 
memory, display data or 
disassembled code. 


Full Symbolic Capability 
Read symbols from files, define 
new ones, use anywhere. 


Powerful Expression Evaluation 
Use any standard assembler 
operators or number formats. 


Direct to Memory Assembler 
Enter instruction statements for 
direct conversion to code in 
memory. 


and More! 

Log file for operations and 
displays, breakpoint and trace 
execution; modify/ : 
search/fill memory, etc. 


MetaScope is designed to fully 
utilize the capabilities of the 
Amiga in debugging your 
programs. If you're programming 
the Amiga,” you can't afford to be 
without it. 


$95 (California residents + 6%). 
Visa/MasterCharge accepted. 


Amiga is a trademark of Commodore-Amiga Inc. 


Metadigm, Inc. 


19762 MacArthur Blvd: 
Suite 300 
Irvine, CA 92715 
(714) 955-2555 
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C CHEST LISTING 


(Listing Continued, text begins on page 18) 


653 
654 
655 
656 
657 
658 
659 
660 
661 
662 
663 
664 
665 
666 
667 
668 
669 
670 
671 
672 
673 
674 
675 
676 
677 
678 
679 
680 
681 
682 
683 
684 
685 
686 
687 
688 
689 
690 
691 
692 
693 
694 
695 
696 
697 
698 
699 
700 
701 
702 
703 
704 
705 
706 
707 
708 
709 
710 
711 
712 
713 
714 
715 
716 
717 
718 
719 
720 
ves 
722 
723 
724 
725 
726 
727 
728 
729 
730 
71 
732 
733 
734 
735 
736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 


int 
char 


strncpy( éenvstr(8], buf, MAXLINE ); 
else 
envstr(8] = '\0' ; 


setenv( envstr , 0 ); 


/* Truncate the command line itself (not the enviornment 
® variable, at 127 characters and then echo it to the 
= screen if Echo is set. Then extract the program name 
n portion of the string (with the next() call). 
mf 


buf ([DOSMAXLINE=3] = '\0'; 


if( Echo ) 
puts( buf ); 
mame = next(ébuf, ' ', <1 ); 
/* Now try to spawn a new process. Suspend the shell until 
. task returns. 
a/ 
if( (rval = spawnlp(P_WAIT, name, name, buf, NULL)) < 0 ) 
{ 
/* If we can't find a .com or .exe file then 
s see if we can find a batch file with ole 
® right name. Otherwise print an error message 
* Note that we have to modify the CMDLINE 
® enviornment string so that the leftmost 
n argument (will be argv(0] in the child 
. process) is the string "sh" 
“/ 


if( errno == ENOENT ) 
{ 


sprintf(envstr, “CMDLINE=sh %s %s", name, buf); 

rval = spawnlp(P_WAIT, “sh", "sh", name, buf, NULL); 
} 
4f( rvai < 0 ) 
{ 


printf("sh: Can't execute %s %s", name, buf); 
perror(" "); 


} 


END_TRACE ("execute") ; 
return rval; 


exp_vars( dest, src, maxcount, mode ) 
*dest, *src; 


™ 
bo 


Copy src into dest, expanding shell variables as 
appropriate. Shell variables all have a $ or a % as their 
first character. The global pointers Numv and Numc keep 
track of arguments for $<num> variables. 


If mode = 1 aliases are expanded 
If mode == 2 Sargs are expanded 
If mode == 3 both are expanded. 


return the size of the expanded string. 
A mode 1 or 3 call will return with the high bit of src 
set. 


++ + + # + * + # 4 HF 


/ 


register int num; 
register char *D 3 
char *start_dest = dest; 


TRACE ("exp vars"); 
DIAG("exp vars, input = <%s>\n", src ); 


™ 


* 4 4+ 4+ + + HF % 


Expand aliases. First, remember the original start of 
the target array. Then, set the high bit of *sre so that 
getvar will look for an alias. Then actually expand it, 
Then clear the high bit of the first character of dest 
(which will be set if no alias was found). 
There is a second-order recursion here in that getvar() 
makes a mode 2 exp vars call. 

/ 


if( mode & 1 ) 
{ 
*srceo |= 0x80; 
getvar( &src, &dest, é&maxcount ); 
DIAG (“exp vars, expanded aliases <%s>\n", start dest); 


/* Now, expand shell variables. If we see and escaped 

= character copy both the \ and the character to dest. 
® else if the character isn't a shell variable (doesn't 
x have a leading $ of %) just copy it. Else, try to 

n expand the shell variable. 

xy 


while( *src && maxcount > 0 ) 
if( *sre == '\\' &6& src[l) ) 


{ 
/* If the character following the \ is a 
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OS eee, eee, eee, ET RE RE RT RS AR I 


fi, = eee ane LL ee ee 


RN AR a ee me 
. a ee 


760 * $ of % then strip the backslash and copy 
761 * the $ or % to the dest array. Otherwise 
762 * copy both the \ and the character that 
763 * follows. 
764 s/ 
765 
766 srctt+; /* Skip past the \ ny 
767 
768 if( !ISVAR(*src) ) 
769 { 
770 if( --maxcount <= 0 ) 
TEL break; 
772 *dest++ = '\\'" ; 
773 } 
774 
45 if( --maxcount <= 0 ) 
776 break; 
777 *destt+t+ = *srct+; 
778 } 
779 else if( !ISVAR( *src ) || ! (mode & 2) ) 
780 { 
781 /* Either character is just a normal character 
782 * (not a shell variable) or we're told to not 
783 * expand shell variables. 
784 nf 
785 
786 *destt+ = *srct+; 
787 if( --maxcount <= 0 ) 
788 break; 
789 } 
790 else if( digit( *++srce ) ) 
TOL { 
792 /* Expand a $<num> arg. first extract the 
793 * <num> from source, then copy the correct 
794 * vector out of the Numv array. 
795 * If the Numv entry is NULL, don't 
796 * put anything in the dest array. 
197 x/ 
798 
799 for( num = 0; digit(*src); ) 
800 num = (num * 10) + (*srct+ - '0'); 
801 
802 if( num < Numc ) 
rns 803 for( p = Numv[num]; *p ; *dest++ = *pt+ ) 
804 1f£( --maxcount <= 0 ) 
805 break; 
806 } 
807 else 
808 { 
809 /* We've found a $ not followed by a number */ 





810 

811 switch( *src++ ) 

812 

813 case '*!; 

814 hum = unargv(Numc, Numv,dest,maxcount,' '); 
815 dest += num; 

816 Maxcount -= num; 

817 break; 

818 

819 case 'p!: 

820 getcwd( dest, maxcount ); 

821 for( ;*dest ; ++dest, --maxcount ) 
822 if( *dest == '\\' ) 

823 *dest = '/'; 

824 break; 

825 

826 case '!': num = get_hnum(); goto skip; 
827 case 's': num = Shlev; 

828 skip: if( maxcount > 5 ) 

829 { 

830 sprintf( dest, "td", num ); 
831 for(;*dest ; ++dest, --maxcount) 
832 ; 

833 } 

834 break; 

835 

836 default: 

837 -—SIrC; 

838 getvar( &src, &dest, &maxcount ); 
839 break; 

840 } 

841 } 

842 

843 *dest = '\O0' ; 

844 } 

845 

846 *start_dest &= Ox7f ; 

847 

848 DIAG("exp vars: on return <%s>,", start dest ); 

849 DIAG(" returning %d\n", dest - start dest ); 

850 

851 END_TRACE ("exp vars") ; 

852 

853 return( dest - start_dest ); 

854 
855 
B56 [8 Hmm nn nnn nn nn nn nn nn nn e555 + +--+ */ 
857 

858 prompt () 

859 { 

860 /* Print a prompt using the PROMPT enviornment variable 
861 * Return true. 

862 xf 

863 

864 char buf [50]; 

865 register char *p; 

866 

867 if( Mode = INTERACTIVE || Echo ) 

868 { 

869 if( !(p = getenv("PROMPT")) ) 

870 printf( “[%d:%d] ", Shlev, get_hnum() ); 


wr 


—) 


(Continued on next page ) 


Dr. Dobb’s Journal, January 1986 





PRIME FEATURES 


e Execute DOS level commands 
in HS/FORTH, or execute DOS 
and BIOS functions directly. 
Execute other programs under 
HS/FORTH supervision. 

(editors debuggers file managers etc) 


e Use our editor or your own. 
e Save environment any time 


as .COM or.EXE file. 
Eliminate headers, reclaim 
space without recompiling. 


¢ Trace and decompile. 


Deferred definition, 
execution vectors, case, 
interrupt handlers. 


FORTH 


Full 8087 high level support. 
Full range transcendentals 
(tan sin cos arctan logs exponentials) 
Data type conversion and 
I/O parse/format to 18 
digits plus exponent. 
Complete Assembler 
for 8088, 80186, and 8087. 
String functions - 
(LEFT RIGHT MID LOC COMP 
XCHG JOIN) 
Graphics & Music 
Includes Forth-79 and Forth-83 
File and/or Screen interfaces 
Segment Management 
Full megabyte - programs or data 
Fully Optimized & Tested for: 
IBM-PC XT AT and JR 
COMPAQ and TANDY 1000 & 2000 
(Runs on all true MSDOS 
compatibles!) 
Compare 
BYTE Sieve Benchmark jan 83 
HS/FORTH 47 sec BASIC 2000 sec 
with AUTO-OPT 9 sec Assembler 5 sec 
other Forths (mostly 64k) 55-140 sec 
FASTEST FORTH SYSTEM 
AVAILABLE. 
TWICE AS FAST AS OTHER 
FULL MEGABYTE FORTHS! 


(TEN TIMES FASTER WHEN USING AUTO-OPT!) 
HS/FORTH, complete system only: $270. 


"=a. Visa Mastercard S&S 


HARVARD 


SOFTWORKS 


P.O. BOX 69 
SPRINGBORO, OH 45066 
(513) 748-0390 





Circle no. 132 on reader service card. 
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Instant-C: 
The Fastest 
Interpreter for C 













































Runs your programs 50 
to 500 times faster than 
any other C language 
interpreter. 





ny C interpreter can save you compile 
and link time when developing your 
programs. But only Instant-C saves 
your time by running your program at 
compiled-code speed. 


Fastest Development. A program 
that runs in one second when compiled 
with an optimizing compiler runs in 
two or three seconds with Instant-C. 
Other interpreters will run the same 
program in two minutes. Or even ten 
minutes. Don’t trade slow compiling 
and linking for slow testing and debug- 
ging. Only Instant-C will let you edit, 
test, and debug at the fastest possible 
speeds. 


Fastest Testing. Instant-C immedi- 
ately executes any C expression, state- 
ment, or function call, and display the 
results. Learn C, or test your programs 
faster than ever before. 


Fastest Debugging. Instant-C gives 
you the best source-level debugger for 
C. Single-step by source statement, or 
set any number of conditional break- 
points throughout your program. Errors 
always show the source statements 
involved. Once you find the problem, 
test the correction in seconds. 


Fastest Programming. Instant-C 
can directly generate executable files, 
supports full K & R standard C, comes 
with complete library source, and works 
under PC-DOS, MS-DOS, or CP/M-86. 
Instant-C gives you working, well- 
tested programs faster than any other 
programming tool. Satisfaction guar- 
anteed, or your money back in first 

31 days. Instant-C is $495. 


Rational 


Systems, Inc. 
P.O. Box 480 
Natick, MA 01760 
(617) 653-6194 


Circle no. 145 on reader service card. 


92 


C CHEST LISTING 


(Listing Continued, text begins on page 18) 


871 
872 
873 
874 
875 
876 
877 
878 
879 
880 
881 
882 
883 
884 
885 
886 
887 
888 
889 
890 
891 
892 
893 
894 
895 
896 
897 
898 
899 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
910 
911 
912 
$13 
914 
915 


916 
Sit 
918 
919 
920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
930 
931 
932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 
945 
946 
947 
948 
949 
950 
931 
952 
953 
954 
955 
956 
$37 
958 


else 
{ 
exp_vars( buf, p, 50, 2 ); 
printf( buf ); 
} 
} 
return 1; 
} 
[OR mm ne x / 
int docmd( cmd ) 
char *cmd ; 
{ 
{* Do one command from line. 
* Return an exit status (or -l on error). 
*/ 
register DIRECTORY *dp; 
register int rval = -1; 
TRACE ("docmd") ; 
PSTR( “docmd(1) cmd=", cmd ); 
/* If ther're no wild cards in cmd then just strip backslashes 
* and quotes. Else, expand the wild cards ( exp_dir will strip 
* backslashes etc.) Then execute the command. 
af 
if( !has_wild(cmd) ) 
strip(cmd); /* Just strip backslashes */ 
else if( !exp_dir(cmd, MAXLINE) ) 
goto abort; 
rval = execute(cmd) ; 
abort: END_TRACE("docmd") ; 


return( rval ); 


rcopy( dest, src, maxcount ) 


register char *dest ; 
char *src 
{ 
register char *tbuf; 
char *tail; 
char *sd = dest; 
DIAG("rcopy (top of proc): src = <%s>\n", src ); 
if( !*sre || maxcount <= 0 ) 
return; 
if( !(tbuf = malloc( maxcount )) ) 
fprintf(stderr,"Sh: out of memory\n"); 
else 
{ 
/* 1) expand the src buffer into tbuf 
* 2) advance tail to point past the next ; and replace 
* the ; with a null. 
* 3) copy everything up to the tail to dest and add a 
* : to dest if the tail is non-null. 
* 4) repeat this process using the tail as source. 
“7 
/*1*/ exp _vars( tbuf, src, maxcount , 3 ); 
tail = tbuf; 
feoes > “rent > €6a01," 2" 2 ONT 
SKIPWHITE( tail ); 
[*3*/ for(src = tbuf; *srce && src-tbuf < maxcount; *dest++ = *src++) 
if( (maxcount -= (sre-tbuf)) 4&& *tail ) 
xdest++ = ';!' ; 
xdest = '\O0'; 
DIAG("rcopy (before recursive call): dest = <ts>\n", sd ); 
/*4*/ rcopy(dest, tail, maxcount); 
free (tbuf) ; 
DIAG("rcopy (after recursive call): dest = <ts>\n", sd ); 
} 
} 
[OR a x / 
char *next_cmd () 
{ 
/* Get a line from input, split off one command, and 
* then return a pointer to it (or NULL if at end of 
* input. History processing is done here too. 
* Semicolons inside quoted strings or preceeded by a '\' 
z do not seperate commands. Comments and blank lines 
* are absorbed (ie. next_cmd won't return until it 
* gets a real input line). 
=p 
static char Cmdbuf(MAXLINE]; /* Should initialize to zeros */ 
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977 

978 

979 

980 

981 

982 

983 

984 

985 

986 

987 

988 

989 

990 

991 

992 

993 

994 

995 

996 

997 

998 

999 

1000 
1001 
1002 
1003 
1004 
1005 
1006 
1007 
1008 
1009 
1010 
1011 
1012 
1013 
1014 
1015 
1016 
1017 
1018 
1019 
1020 
1021 
1022 
1023 
1024 
1025 
1026 
1027 
1028 
1029 
1030 
1031 
PGS2 
1033 
1034 
1035 
1036 
1037 
1038 
1039 
1040 
1041 
1042 
1043 
1044 
1045 
1046 
1047 
1048 
1049 
1050 
1051 
1052 
1053 
1054 
1055 
1056 
1057 
1058 
1059 
1060 
1061 
1062 
1063 
1064 
1065 
1066 
1067 
1068 
1069 
1070 
1071 
1072 
1073 
1074 
1075 
1076 
1077 
1078 
1079 
1080 
1081 
1082 
1083 
1084 
1085 
1086 


static char *src = Cmdbuf ; 
register char D3 
char *tbuf; 


TRACE ("next _cmd") ; 


DIAG ("next_cmd: src is <%s>\n", src ); 


while( !*src ) 


{ 


do 
{ 
prompt (); 
if( !(*Ifunct) () ) 
{ 
END_TRACE("next_cmd" ); 
return NULL; 
} 
DIAG("next_cmd: got <%ts> from input\n", Ibuf ); 
src = Ibuf; 
SKIPWHITE( src ); 
} 
while( !*srce || *src == COMMENT ); 


history( src, MAXLINE - (src-Ibuf) ); 
SE¢ *exrc,) 


rcopy( Ibuf, src, MAXLINE ); 
src = Ibuf; 


} 
O = nexté éere,.%)*-. *VA") 


DIAG ("next_cmd: buffer <%s>\n", p )¢ 
DIAG("next_cmd: on next call buffer will be <ts>\n", src ); 


strcpy( Cmdbuf, p ); 
if( Verbose ) 
printf("({sh %d input] <%s>\n", Shlev, Cmdbuf ); 


DIAG ("next_cmd: returning <%s>\n", Cmdbuf ); 
END_TRACE( "next _cmd" ); 


return( Cmdbuf ); 


/* ae ee oo ee wr ew ww we ww ww www ww ww oe own wm ww we ww we we oe ee ee ee x/ 
char *errmsgs([] = 
{ 
"sh shell entered in interactive mode\n", 
"sh %ci enter interactive mode\n", 
"sh %cc <string> commands are read from string. If several strings\n", 
- are present they are concatanated together before\n", 
" execution. The 'c' may be upper or lower case.\n", 
"sh file args... commands are taken from <file>. Args are expanded\n", 
. to correspond with $0 $1 etc inside the file.\n", 
“ for DOS compatability %0 %1 etc are also recognized\n", 
"sh %cq Strip quotes from quoted argument strings. Usually\n", 
2 they are left in so that a spawned process can\n", 
- assemble its argv correctly.\n", 
"sh %cv Print input lines to the shell as they are read.\n", 
"sh %cx Print lines as they are executed\n", 
au 
}; 
usage( c ) 
{ 
/* Print the usage error message. 
“/ 
register char “ep: 
fprintf(stderr, "Sh: illegal argument <%tc>: Usage is\n\n", c); 
for( pp = errmsgs; **pp ; fprintf(stderr, *pp++, Switchar) ) 
exit(..i.}: 
} 
[ Bee en enn ne e+ + x / 
int setargs( p ) 


register char *p; 


{ 


/ Set various global flags base on command line 
arguments. This routine will also be used by 
"set" which can't recognize the -c switch. So, 
ignore -c if c_enabled is false. p should point 
at the - on entry. Processing will terminate when 


a space or tab or end of string is found. 


+ + FF OF 


/ 

TRACE ("setargs"); 
if( *++p ) 

{ 


Targs p's; per 
{ 
switch( *p ) 
{ 


case “c's 


case 'C': Mode = COMMAND; break; 
case ‘q': Noquotes = 1; break; 
case ‘'v': Verbose = 1; break; 
case. *x*:. Echo = 1; break; 


(Continued on next page ) 
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Ad 


He 


stile ea eels 
Ue 
eee see 
YOUR IBM PC. 


DATA TYPES 

Lists and Symbols 
Unlimited Precision Integers 
Floating Point Numbers 
Character Strings 
Multidimensional Arrays 
Files 

Machine Language Code 


MEMORY MANAGEMENT 
Full Memory Space Supported 
Dynamic Allocation 
Compacting Garbage Collector 


FUNCTION TYPES 
EXPR/FEXPR/ MACRO 
Machine Language Primitives 
Over 190 Primitive Functions 


10 SUPPORT 

Multiple Display Windows 
Cursor Control 

All Function Keys Supported 
Read and Splice Macros 
Disk Files 


POWERFUL ERROR RECOVERY 
8087 SUPPORT 

COLOR GRAPHICS 

LISP LIBRARY 


Structured Programming Macros 
Editor and Formatter 

Package Support 

Debugging Functions 

.OBJ File Loader 


HM RUNS UNDER PC-DOS 1.1 or 2.0 
Ea ee ena 


IQLISP 
5¥%’’ Diskette 
and Manual. ———SCS<S 175.00 





fi q Integral Quality 
P.Q. Box 31970 

Seattle, Washington 98103-0070 
(206) 527-2918 


Washington State residents add sales tax. 
VISA and MASTERCARD accepted. 
Shipping included for prepaid orders. 
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UNIVERSAL 
MLM aan C CHEST LISTING 


(Listing Continued, text begins on page 18) 















1087 case 'i': Mode = INTERACTIVE; break; 
iT works witH ALL 1088 case 1: 
1089 case ‘\t': goto abort; 
LANGUAGES 1090 default: usage( *p ); break; 
1091 } 
BASIC, C, PASCAL, FORTRAN, COBOL, ceee } 
ASSEMBLER, dBASE ... you name it. SOL abort: 
IT HANDLES 1095 END TRACE("“setargs") ; 
standard languages, 1096 } 4 
extended languages & exotic languages. 1097 
IT CONFIGURES Pee Pie a ee ee a ge eae 
to your com- 1099 
; ; 1100 ‘ 
piler, interpreter, or assembler — ALL 1101 a ee 
BRANDS — ALL VERSIONS. 1102 { 
1103 if( --arge <= 0 ) /* Check for comand line args & */ 
1104 { /* use interactive mode if none */ 
INTRODUCTORY 95 1105 Mode = INTERACTIVE; /* are found. x/ 
PRICE 1106 Ifunct = interactive _input; 
1107 return; 
$3.00 S/H - MC/Visa/Check - 6% Texas Sales Tax 1108 } 
. 1109 
For the IBM PC, XT & compatibles. DOS 2.0+ 1110 if( **(++argv) = Switchar ) /* There's at least one arg, */ 
1111 { /* skip to second arg and call */ 
DALSOFT SYSTEMS 1112 setargs( *argvt+ ); /* set args if the first char Me 
x 1113 --argc; /* is a -. Then skip past the * 
3565 High Vista - Dallas, TX 75234 snve , ft samcanid avg eae: 27 
(214) 247-7695 1115 
1116 Numv = argv ; 
' 1117 Numc = argc ; 
Circle no. 86 on reader service card. 1118 
1119 if( arge <= 0 || !**argv ) 
1120 { 
Sas Sigua 172% fprintf(stderr,"Sh: missing file name, "); 
Software 1122 fprintf(stderr,"use -i for interactive input\n"); 
® 1123 exit(1); 
Quelo N Development 1124 
1125 else if( Mode == COMMAND ) 
WY Tools 1126 
68000/68010 Assembler Package aes ; Pianos ‘= cemnmand _angut; 
Assembler, linker, object librarian and extensive indexed 1129 else if( Mode == FILEMODE 6&& ! (Filename = search(*argv, “bat"))) 
typeset manuals. 1130 { 
Conforms to Motorola structured assembler, publication 1A3i fprintf(stderr,"Sh: can't find <%s>\n", *argv ); 
M68KMASM{J4]. Macros, cross reference and superb load 1132 exit(1); 
map, 31 character symbols. 1133 } 
Optimized for CP/M-80, -86, -68K, MS-DOS, PC-DOS .$ 595 cae } 
Portable Sowes in "Ot oo. ie F i a iw can oe $3000 1136 /*----------------------------- -- == -- $5 2 2 nn nnn nnn nnn x / 
L137 
Lattice® 68000 “C” Cross Compiler 1138 setenv( env, allocate ) 
and Quelo 68000/68010 Assembler Package 1139 char *env; 
1140 { 
Optimized fOr MS-DOS 4 sii. 3 4. ee ere wiicgsss ng $1095 27 S1 /* Set an enviornment. Env may be "name=conttnts" or the = may 
1142 * be a space. 
68200 Assembler Package 1143 * If allocate is true allocate space, otherwise acutally use 
Optimized for CP/M-80, MS-DOS, PC-DOS......... $ 595 v Tae ap ten a Past oy SURE ER) Ree BEE ag 
1146 
68020 Assembler Package 1147 register char ‘*p; 
Optimized for CP/M-68K,MS-DOS ............... $ 750 1148 
Pottable Source in“G* 65 oy es See ES ke $3500 1149 e% Look for either a space or a = in the string. If you 
: : 1150 * find a space, replace it with an =. 
For more information contact Quelo Inc. 1151 */ 
2464 33rd W. Suite #173 1152 
Patrick Adams Seattle, WA 98199 em rag ey. te 1 Sie tiens Card 5 ee 
Phone (206) 285-2528 pe ELD et oe ee anes > 
CP/M, tm DRI.MS-DOS tm Microsoft. Lattice, tm Lattice Inc. 1156 *p = ta! ; 
Los 
1158 /* Now set the enviornment to the indicated value 
Circle no. 205 on reader service card. < ; : */ 
1161 if( p = allocate ? strsave( env ) : env ) 
1162 if( putenv(p) != -1 ) 
1163 return; 
1164 
1165 fprintf(stderr,"Sh: setenv failed, out of memory\n"); 
1166 if( allocate && p ) 
1167 free(p); 
HIGH QUALITY CP/M rie 
SOFTWARE ee Peeing tal ead ee ee ee ee ee “/ 
£71 


HiSoft has been selling Z80 CP/M software in 
Britain and Europe for over 4 years. Now we'd 
like to introduce you to our range of program- 


Liv2 ‘set( <str.) 
1173 register char *str; 


i 1174 { 
ming languages: Ti75 /* Set a shell variable, syntax is 
HiSoft Devpac: Z80 assembler/editor/ 1176 : [whitespace] <name> [= <value>] 

debugger 1177 */ 

; 88 1178 

HiSoft C: Kernighan/Ritchie 1179 register int i; 
implementation ice ae ee 

: 1181 

HiSoft Pascal: fast, standard compiler 1182 /* Get the name, replacing the trailing blank or = with 
All at $69 inclusive each 1183 3 a null. Print variables if there is no name. 
: 1184 > 
These programs are also available for other 1185 
Z80 machines including Timex 2068. — if( i*str ) 
Call or write for full technical details and ; 
” 1188 tow : uw u u ° . 

press commentaries, or order from: 1189 erant Lote te, as\ne. “oma”, i ca heme "OFF"; 

=e eax HISOFRT 1190 printf("%-8s: %s\n", "verbose", Verbose ? "ON" : “OFF"); 

8 Cy 1191 printvars(); 
1192 } 
| > 180 High St. North 1193 else 


Dunstable LU6 1AT 


a eee ENGLAND 


ea 01144 (582) 696421 





Circle no. 134 on reader service card. 
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1194 


1195 for(name = str; *str ; +t+str ) 

1196 if( *str = '=' || *str == ' ') 

1197 { 

1198 *str++ = 0; 

1199 break; 

1200 } 

1201 

1202 /* Get the command tail, skipping past any = 

1203 * or blanks to get there. 

1204 */ 

1205 

1206 while( *str == '=' || *str == ' ' ) 

1207 LEBEL 17 

1208 

1209 /® Process the command: 

1210 “7 

1211 

1212 i = *str ? atoi(str) : 1; 

1213 

1214 if( 'stremp( “echo", name)) Echo = i; 

1215 else if( !strcemp( "verbose", name)) Verbose = i; 

1216 else if( !strcemp( “cmd", name)) Cmd = i; 

ae ! else setvar (name, str); For starters, we have by far the best 

1219 } design, a superior base to build from. 

1220 ; i 

1221 | ae ae ee ee ---------------- While the competition adds new 

lZ2zZ * Alias support uses the same tables as shell varialbes. However, Ms " 

i223 .* the top bit of the first character of the alias name is set modes for every feature, Wwe have a 
- s . 

ae iat ee ee pure, consistent and expandable 

1226 | it 

Ge wha Lei ace! 3 design. While the competition forces 


1228 
1229 
1230 
1231 
1232 
1233 
1234 
1235 
1236 
1237 
1238 
1239 
1240 
1241 
1242 
1243 
1244 
1245 
1246 
1247 
1248 
1249 
1250 
1231 
1252 
1253 
1254 
1255 
1256 
1257 
1258 
1259 
1260 
1261 
1262 
1263 
1264 
1265 
1266 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
1278 
1279 
1280 
1281 
1282 
1283 
1284 
1285 
1286 
1287 
1288 
1289 
1290 
1291 
1292 
1293 
1294 
1295 
1296 
1297 
1298 
1299 
1300 
1301 
1302 
1303 
1304 


char 


{ 


} 


*str; 
if ( *stz..) 
{ 


*str |= 0x80 ; 
unsetvar( str ); 


alias( str ) 


char 
{ 


*str; 


ant. }*str~} 
printalias(); 
else 


{ 
*str |= 0x80 ; 
set( str ); 


/* Print working directory 


char nbuf[80]; 


if( !getcwd( nbuf, 80 ) ) 
fprintf(stderr, "sh: path too long to print.\n"); 


printf("%s\n", nbuf ); 


disk_present( id ) 


ant 
{ 


id; 


{* Return true if there's a disk plugged into the 

* indicated drive, else print an error message 

* and return 1. This routine assumes that drive 

* C has a disk in it so it will return true if id = 'c' 
x or id == 'C' without checking. 


register int try = 5; 
register int err ; 
union REGS regs; 


/* times to try to read disk ¥7 


if( (id = toupper(id)) == 'c' || id == 'c' ) 
return 1; 


.ah 
-al 
~ OX 
dh 
al 


regs. 
regs. 
regs. 
regs 
regs 


4; /* Service #4 (verify sec) */ 
l; /* # of sectors * / 
0; /* track # & sector # x/ 
0; /* head # x/ 
id - 'A'; /* drive # x / 


pokoD 


/* Actually read the disk. Loop until we've gotten a timeout 
- error (0x80) from dos try times. 
“/ 


do{ 
err = int86(0x13, &regs, &regs) & Oxff; 


} while( (err & 0x80) && (--try >= 0) ); 


st ({ ere) 
{ 
regs.h.ah = 0x0; /* Recalibrate diskette system */ 


int86(0x13, éregs, &regs); 


fprintf(stderr,"Cd: can't log on drive %c, ", toupper(id)); 


you to accept their particular philosophy, 
we Offer maximized flexability. If you 

already have a debugger or are looking 
for your first, look no further because 

you can't do any better. We invite you to 
compare our debugger, DSD86, with 

any other on the market. 
LLL 


® Recursive Command Macros & Files # 
® Bind Macros to any key @ 
® Multi-segment Symbol Support @ 

# Symbolic Register & Stack Displays @ 
& User Customizeable Screen Layout @ 
® Superior Mode-less Design & 

# Source Window for MS Languages # 
# User Writable Commands & Displays @ 
& Fast Screen Update @ 
® Unique Breakpointing Facilities # 

@ 30 Day Money Back Guarantee & 


PAO a 
Call or write for our free report on truly 


advanced debugging technology which 
explains DSD86's design and why it is 
superior to the debugger you are 
currently using. 


Take the DSD challenge: secure a 
money back guarantee with any of our 
competitors. Buy both debuggers and 

use them for a month. Send the one 
you like least back for a refund. 


Only $69.95! 


Soft Advances 
P.O. Box 49473 
Austin, Texas 78765 
512-478-4763 


“Programming for Productivity and Profit’ 
Please inciude $4 shipping 
TDR PL 





(Continued on next page) 
Circle no. 83 on reader service card. 
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Stop Thinking- 
Start Programming Today! 


SPECIAL INTRODUCTORY OFFER! 
C* Prime, Personal Computing and C, 


Plus Apprentice C. 
A $169 value only 


$99 





NEW FROM MANX AZTEC! 
C’ Prime 


Never has C been easier to learn. 
Manx Aztec is now offering a com- 
plete C system called C’ Prime at an 
exceptionally low price. This powerful 
system includes a Compiler, Linker, 
Assembler, Editor, Libraries and Ob- 
ject Librarian. C PRIME supports a 
host of third-party software. 


C Apprentice $4995 $39.95 


Learn C quickly with this complete, 
easy-to-use C language interpreter. 
Apprentice C includes a complete one- 
step compiler that executes with lightn- 
ing speed, an editor, and a 

run-time system. 


NEW FROM ASHTON-TATE! 
Personal Computing and C 


A detailed, easy-to-understand guide to 
C programming prepared especially by 
Ashton-Tate for use with the new 
Aztec C’ Prime. Includes chapters on 
C programming basics, function 
libraries, data handling, and advanced 
features, plus a complete money man- 
agement demonstration program. 





To order or for information call: 


JC WAR 


1 800-TEC- WARE 


(In NJ call 201-530-6307) 


UNIX is a registered TM of Bell Laboratones, dBase TM Aston Tate. Inc. MANX AZTEC. C PRIME. 
Apprentice ( TM Manx Software Systems, Inc 


96 Circle no. 109 on reader service card. 
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C CHEST LISTING 


(Listing Continued, text begins on page 18) 


1305 
1306 
1307 


1351 
1352 
1353 
1354 
1355 
1356 
1357 
1358 
1359 
1360 
1361 
1362 
1363 
1364 
1365 
1366 
1367 
1368 
1369 
1370 
1371 
1372 
1373 
1374 
1375 
1376 
1377 
1378 
1379 
1380 
1381 
1382 
1383 
1384 
1385 
1386 
1387 
1388 
1389 
1390 
1391 
1392 
1393 
1394 
1395 
1396 
1397 
1398 
1399 
1400 
1401 
1402 
1403 
1404 
1405 
1406 
1407 
1408 
1409 
1410 
1411 


fprintf(stderr,"DOS error code = 0x%02x\n" , err ie 
} 
return( !err ); 
} 
[| * o---- -- -- -- - - - - - - -- - - - + - - - - - x / 
void cd( name ) 
register char *name; 
{ 
/* Change the current directory to the indicated name. 
* Log in a new disk if necessary. This routine is 
* a bit more sophisticated than DOS itself, in that 
* it checks if a disk exists before trying to 
* log it on. This checking is done using the 
? "Get diskette status" service of BIOS interrupt 0x13. 
x Get to the current directory on another disk by saying 
* "cd x:" Get to another directory on another disk by 
* saying “cd x:/dir/subdir/etc" 
a} 
if( *name && name[{1] == ':' ) 
{ 
if( !disk_present(*name) ) 
return; 
else 
{ 
bdos( Oxe, toupper(*name) - ‘A', 0); 
name += 2; 
} 
} 
if( *name «&& chdir( name ) < 0 ) 
fprintf(stderr, "sh: Can't find %s\n", name ); 
} 
/* we en a a wn wo a wo ow ww ww nw oo ee ee ee ee ee eee x / 
shift () 
{ 
/* Process the "shift" command (move all the $ args left 
a one notch). 
“f 
if( Numc ) 
{ 
--Numc; 
++Numv; 
} 
} 
/* ae a as om ee Se aes oe a ae ns em eee ae ae OS ee re ew ee ee er ee we ew ee ws ee ee x / 
doenv () 
{ 
f* Reads and initializes the various enviornment variables. 
* This routine should only be called once and it must be 
* called before Shlev is used and before command line 
* processing is done. 
.: 
static char sbuf [16]; 
register char *p; 
if( (p = getenv("SWITCHAR")) && *p ) 
Switchar = *p ; 
if( (p = getenv ("SHLEV") ) && *p ) 
Shlev = atoi(p); 
sprintf(sbuf, “SHLEV=%d", ++Shlev ); 
setenv (sbuf); 
} 
[ Beene en a ee ee ee ee ee ee ee ee eee eee * / 
use_exit() 
{ 
/* We get here on a SIGINT (*C) interrupt 
«7 
signal( SIGINT, use exit ); 
fprintf(stderr,"Use \"exit\" or \"logout\" to leave outer shell.\n"); 
} 
/* a a a a a a a ee x / 
TOKEN tokenize( buf ) 
register char *buf; 
{ 
/* This is an extremely primitive token recognizer that will 
*x 


eventually be replaced with something more reasonable. 
=/ 


if¢ tstroanp( “alias", 
if( !stremp( “cd", 

if( !strcemp( “exit", 
if( !stremp( “history", 
if( !strcemp( "logout", 
if( !stremp( "pwd", 

if( !stremp( "rem", 

if( !strcmp( "setenv", 
if( !stremp( "set", 

if( !stremp( "shift", 
if( !stremp( “unalias", 
if( !stremp( “unset", 


buf) ) 
buf) ) 
buf) ) 
buf) ) 
buf) ) 
buf) ) 
buf) ) 
buf) ) 
buf) ) 
buf) ) 
buf) ) 
buf) ) 


return ALIAS; 
return CD; 
return EXIT; 
return HISTORY; 
return LOGOUT; 
return PWD; 
return REM; 
return SETENV; 
return SET; 
return SHIFT; 
return UNALIAS; 
return UNSET; 


(Continued on page 98) 
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The Datalight C Compiler 
for MSDOS is a full C with 
all K&R constructs, 
including bitfields, 
plus the version 7 


DATALIGHT C 


of the compiler are: BO 


= Produces object files (.obj) so just the MSDOS 
linker is required. 

aFloating point performed with 8087 or 
automatic software floating. 

#Over 100 compact library functions with source. 

sCompatible with the Lattice C compiler. 

aRuns On IBM-PC, and compatibles, running 
MSDOS 2.0 or later. 

aComplete, easy-to-read users’ manual with index. 

gHighly optimized code for production quality 
programs. 


Datalight 


11557 8th Ave. N.E. 
Seattle, Washington 98125 
(206) 367-1803 








Outside USA add $10 shipping. Washington State residents add 7.9% sales 
tax. VISA and MasterCard accepted. 


IBM-PC, a trademark of IBM; MSDOS, a trademark of Microsoft Corp.; Lattice 
C, a trademark of Lattice Corp. 


Circle no. 203 on reader service card. 


INDUSTRIAL PASCAL 
FOR THE 68000 


__|f you’re looking for a language to write real-time pro- 
- cess control software, look no further. With the rising 
- cost of labor, it is becoming critical that a high level lan- 
- guage be used whenever possible. Find out why over 


1400 companies have switched to OmegaSoft Pascal for 
their demanding applications. 

OmegaSoft Pascal takes the Pascal framework and ex- 
pands the basic data types, operators, functions, and 
memory allocation to fit the needs of real-time systems. 
These additions fit in the same structure as Pascal and 
enhance its usefulness without impairing the excellent 
readability, ease of maintenance, and structured design. 

The compiler package includes the compiler, interac- 
tive symbolic debugger, relocatable macro assembler, 
linking loader, and screen editor. Source code is provid- 


ed for the debugger, screen editor and runtime library. 


Versions to run under the OS-9/68000 and VERSAdos 
operating systems are currently available to end-users 
and OEM's. End user price is $900 (domestic) or $925 
(international). A version for CP/M-68K is available for 
OEM use, with OEM versions for UNIX type operating 
systems to follow. : 


TM OmegaSoft is a trademark of Certified Software Corporation OS-9/68000 is a tradematk 
of Microware VERSAdos 's a trademark of Motorola. CP/M-68K 1s 2 trademark of DRI UNIX is 
a trademark of Bell Labs. 


CERTIFIED Real T: CORPORATION 
616 Camino Caballo, Nipomo, CA 93444 
Telephone: (805) 929-1395; Telex: 467013 





Circle no. 209 on reader service card. 


Relocatable Z80 Macro Assembler 


Only $49.95 plus shipping. 
8080 to Z80 Source Code Converter. 


Generates Microsoft compatible 
REL files or INTEL compatible hex 


| files. 


Compatible with Digital Research 


@ Phase/dephase. 

@ Cross-reference generation. 

@ Full Zilog mnemonics. 

@ INCLUDE and MACLIB FILES. 
8 


Separate data, program, common, 
and absolute program spaces. 


macro assemblers MAC & RMAC. @ Supports Hitachi HD64180. 
Generates Digital Research compat-  e Z80 Linker and Library Manager for 


ible SYM files. 


Conditional assembly. 


Microsoft compatible REL files avail- 
able as an add-on to Assembler. 


a oe ach ATTENTION Turbo Pascal Users: 
O 


Assembler will generate Turbo Pascal in-line machine code include files. 


Circle no. 190 on reader service card. 











A general purpose programming 
language for string and list 
processing and all forms of 

non-numerical computation. 


SNOBOL4+ 


SNOBOL4 language with its superb pattern-matching 


—the entire 


facilities * Strings over 32,000 bytes in length ® Integer 
and floating point using 8087 or supplied emulator ow 


© ASCII, binary, sequential, and random- as? 
access |/O ® Assembly Language inter- A 
Bi er ae yes 0 
program execution ® ate 
SAVE files © Program 
and data space up v's With 
to 300K ee ee we with & over 
at ae 100 sample pro- 
tos grams and functions 
wy of 
Han" ar " For all 8086/88PC/ MS-DOS 
V6 128K minimum 5% DSOD. 
<0 
oe Send check, VISA, MC for $95 to: 


Prentice-Hall 


B&P Div. Attn. F. Roe Lae Cliffs, NJ. 


800-624-0023, in New Jersey 800-624-0024 





Circle no. 201 on reader service card. 


Over 60 volumes of public 
domain software including: 


® compilers 

© editors 

® text formatters 

® communications 
packages 

e many UNIX-like tools 


Write or call for more details 


The C Users’ Group 
Post Office Box 97 
McPherson, KS 67460 
(316) 241-1065 





Circle no. 181 on reader service card. 


Tree shell 


A Graphic 
Visual Shell for wih 
Unix/Xenix 

End-Users and 
Experts Alike! 
















See Us At 


UniForum. 


February 4-7,1986 
Anaheim Convention Center 


CoBITare 


“A Higher Form of Software” 
24000 Telegraph Road 
Southfield, MI 48034 
(313) 352-2345 
TELEX: 386581 COGITATE USA 


Circle no. 81 on reader service card. 
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C CHEST LISTING 


(Listing Continued, text begins on page 18) 


1412 
1413 
1414 
1415 
1416 
1417 
1418 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1448 
1449 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
1471 
1472 
1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 
1481 
1482 
1483 
1484 
1485 
1486 
1487 
1488 
1489 
1490 
1491 
1492 
1493 
1494 
1495 
1496 
1497 
1498 
1499 
1500 
1501 
1502 
1503 
1504 
1505 
1506 
1507 
1508 
1509 
1510 
1511 
1512 
1513 
1514 
1515 
1516 
1517 
1518 





return CMD; 
/* Oe ee ee Oe ee Ee ee Ee OE RO OREO eS OS OS ew www Ee ee eee ee ew ee eee eee * / 
{* Process commands using the current Ifunct. Continue till 
* end of input is reached. If expand_vars is false then 
* aliases and $args aren't expanded. This lets us read 
* in the shrc.bat file unmolested 
s/ 
char emdbuf [9]; /* Place to put extracted command */ 
char *mH, *start; 
register char *omd; 


register int 43 
int rval = 0; 


while( start = cmd = next_cmd() ) 
{ 


DIAG("cmds: next_cmd returned <%s>\n", cmd ); 

/* 
* Strip the command name from the rest of the command 
«/ 

p = cmdbuf; 

for( 1 = 8; --i >= 0 && *cmd && *cmd != '' '' *po++ = *cmd++) 

*pD = '\or; 

DIAG("cmds: partitioned <ts>", cmdbuf ); 


DIAG("+ <%s>\n", omd ); 


SKIPWHITE (cmd) ; 
/* If Echo is set then echo the command to standard 


* output. Note that if i == CMD then the command 
* will be echoed in execute() (called by docmd()). 


*/ 
if( (i = (int) tokenize(cmdbuf)) != (int) CMD && Echo ) 
puts( start ); 
switch( i ) 
{ ¢ 
case ALIAS: alias ( cmd ); break; 
case CD: cd ( cmd ); break; 
case CMD: rval = docmd(start); break; 
case HISTORY: print_hist( stdout ); break; 
case PWD: pwd ( )e break; 
case REM: break; 
case SET: set ( cmd ); break; 
case SETENV: setenv ( amd ); break; 
case SHIFT: shift ( A? break; 
case UNALIAS: unalias ( amd ); break; 
case UNSET: unsetvar( cmd ); break; 
default: printf ("Illegal token\n"); break; 
case LOGOUT: 
reset_fileinput(); 
if( access(Filename = "/logout.bat", 04) == 0 ) 
cmds(); 
/* Fall through to EXIT case */ 
case EXIT: 
goto exit; 
} 
} 
return rval; 
/* SSSR Pe ee wee ee ee we wee we ee Oe ow we ww we we oe ee we ee ee wee ew ew ee ew ee we ee wee ewe ee x / 


main(argce, argv) 


char 
{ 


**argv; 
/* Exit status is that of the most 
¥ recently excuted program. In the case of a batch file 
* the exit status will be that of the shell processing 
* the batch file (ie. of the last program executed by 
* that shell). 
*/ é 


reargv(éargc, é&argv); /* Get a long command line if one's there*/ 


doenv(); /* Read various enviornment variables and 
* intialize Shlev, which holds the 
* current shell level. 
*/ 
/* Process the two automatic batch file. /shrc.bat is 
* executed every time a shell is created. /login.bat 
+ is only executed when a level 0 shell is created. 
* 


if( access(Filename = "/shrc.bat", 04) = 0 ) 


emds(); 

reset _fileinput (); 
} 
rest Shlev == 0 && access(Filename = "/login.bat", 


cmds(); 


04) = 0 ) 
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reset fileinput(); 


Now process the command line arguments. Doargs will 
set the Echo, Verbose, Cmd and Mode variables as 
appropriate. If we're in an interactive, level 

0 shell, Call signal to prevent “C from working on 
the shell itself and print a copyright notice. 


doargs(arge, argv); 


Mode == INTERACTIVE ) 


if( Shlev == 0 6&& 
{ 


Signal( SIGINT, use exit ); 


fprintf(stderr,"SH (ver %s) - Copyright (c) 1985, ", 


/* Process command line args ¥f 


VER) ; 


fprintf(stderr,"Allen I Holub. All rights reserved.\n"); 


} 


/* Finally, process commands from the input source determined 


* by the command line. 
a} 


exit( cmds() ); 





We've just done something we know you'll like. 
We've made the SemiDisk far more affordable than 
ever before. With price cuts over 25% for most of 
our product line. Even our new 2 megabyte units 
are included. 


It’s Expandable 


SemiDisk Systems builds fast disk emulators for 
more microcomputers than anyone else. S-100, 
IBM-PC, Epson QX-10, TRS-80 Models II, 12, and 16. 
You can start with as little as 512K bytes, and later 
upgrade to 2 megabytes per board...at your own 
pace, as your needs expand. Up to 8 megabytes per 
computer, using only four bus slots, max! Software 
drivers are available for CP/M 80, MS-DOS, ZDOS, 
TurboDOS, VALDOCS 2, and Cromix. SemiDisk 
turns good computers into great computers. 


SEMIDISK 





SemiDisk Systems, Inc., P.O. Box GG, Beaverton, Oregon 97075 


Call $03-646-5510 for CBBS/NW, 503-775-4838 for CBBS/PCS, and 503-649-8327 for CBBS/Aloha, all SemiDisk equipped computer bulletin boards ( 300/1200 baud ) SemiDisk, SemiSpool trademarks of SemiDisk Systems. 


Time and Money. 


End Listing 


Shell listings continue next month 


Battery Backup, Too 


At 0.7 amps per 2 megabytes, SemiDisk consumes 
far less power than the competition. And you don’t 
have to worry if the lights go out. The battery 
backup option gives you 5-10 hours of data 
protection during a blackout. Nobody else has this 
important feature. Why risk valuable data? 


The Best News 


512K 1Mbyte 2Mbyte 
SemiDisk I, S-100 $695 $1395 
SemiDisk II, S-100 $995 $1995 
IBM PC, XT, AT $595 $1795 
QXx-10 $595 $1795 
TRS-80 II, 12, 16 $695 $1795 
Battery Backup Unit $150 $150 $150 


Someday you'll get a SemiDisk. 
Until then, you'll just have to....wait. 


EGie, saa 
‘ [mara 


503-642-3100 


Circle no. 85 on reader service card. 
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Z80 CP/M Users Take Heart! 
Here’s All You Need to Write 


_ Own Programs For Only $25! 


~DR. DOBB'S 






FOR Z 80. 


Item #022 


_ Do you use CP/M? Do you feel as if the only part of the 
computer industry that has not abandoned you is your 
own Z80 computer? It keeps on working, but when you 
need programs for if, you have to write them yourself. 
When you do, you quickly find that while Pascal or Basic is 
okay for some things, there is offen no substitute for the 
speed, small size, and flexibility a an assembly language 
program. 


DR. DOBB'S TOOLBOOK FOR Z80 puts the power of as- 
sembly language in the hands of anyone who’s done a 
little programming. You'll find: | 


eA method of designing programs and coding 
them in assembly language—and—a demonstration 
of the method in the construction of several complete, 
useful programs. 





TOOLBOOK — 







LS 
SSH 
SEE 


sper 


@A complete integrated toolkit of subroutines for 
arithmetic, for string-handing, and for total control of the 
CP/M fille system. They bring the ease and power of a 
compiler’s run-time library to your assembly language 
work, without a compiler’s size and sluggish code. 


Best of all, every line of the tookit’s source code is there 
for you to read, and every module’s operation is ex- 
plained with the clarity and good humor for which Dave 
Cortesi’s writing is known. 


Save Yourself the Time and Frustration of 
File Entry 
Order the Z80 Software on Disk! 


All the software in DR. DOBB’S TOOLBOOK FOR Z80 
the programs plus the entire toolkit, both as source code 
and as object modules for both CP/M 2.2 and CP/M 
Plus—is yours on disk. (A Z80 microprocessor and a Digital 
RMAC assembler or equivalent are required. ) 


Receive DR. DOBB'S TOOLBOOK FOR Z-80, along with 


the software on disk together for only $40. Item #022A 


Se ee ee eee eee cm ems Eee eee ms Maes es ces esate ees ce ees aes es es ls is els Qe 


To order, return this form with your payment, plus $1.75 for shipping in the U.S., $3.75 outside the U.S., to: M&T Publishing 2464 


Embarcadero Way, Palo Alto, CA 94303 


Or, for faster service on credit card orders, CALL TOLL FREE 1-800-528-6050, ext. 4001. Refer to item #022 for the Z80 Toolbook 
and item #022A for The Z80 Toolbook with the disks. Please specify disk format. 


YES! Please send me 


FOR Z 80 for $25 each. 
Please send me sets of DR. DOBB’S TOOLBOOK FOR 7-80 
together with the software on disk for $40 per set. 


copies of DR. DOBB’S TOOLBOOK 








CA residents add applicable sales tax 


subtotal 
% 
shipping 

TOTAL 





For the Z-80 software on disk, please specify one of the following formats: ___8” SS /SD ___Apple ____Osborne ____Kaypro 


—_Check enclosed Charge my ___VISA ___ M/C ____Amer. Exp. 


SRG AP ceases ee eee a en Bk ee ae or aay os age eS Exp. Date 
signature Sr ee ee Ear eg hah pei ha a ee ee et eg 
Name 


Address 


a gig ee ee ee Ee a aR tan a gi a ne ent atpembioritnt Bit ole gt 
: Tee SgMe ugh an gsagininh Uadegete C1 RST ee am a a en i tl etc lt ep ish apace tela naire x illigha torent hn ints alu yin re FS 
City Se nn en Ne een rer Ege EE ee State faa ML ea 7 


Zip 


3114A 








PL/68K 


LISTING ONE (Text begins on page 26) 


/* 
Declare the format of a macro table node. 
wf 
struct node { 
struct node * next; /* Pointer to next node. */ 
int nargs; /* Number of args in macro. */ 
char * name; /* Pointer to name of macro. */ 
char * text; /* Pointer to replacement text of macro. */ 
}3 
/* 
Define the hash table used to access nodes of the macro table. 
«/ 


#define MAC PRIME 101 


struct node * ht [MAC_PRIME]; 


/* 
Look up a symbol in the macro table. 
Output: 2 if found, NZ if not found. 
ad pointer to text of symbol. 
dOw number of arguments (0-n), -1 if no arguments. 
a} 


#define hash val d2 
#define bpd al 
#define bpl a2 


lookup (symbo1) 

register char * symbol; 

{ 
register struct node **bp0, *bpl; 
register int hash_val; 


/* Get the hash value of the symbol into hash val. */ 


hash (symbol) ; 
hash_val = dO; 


/* Point bpO into the hash table. */ 
boO = «éht; 

hash_val *= sizeof(struct node *); 
adda (hash_val, bp0); 


/* Search down the list of buckets hanging from the hash table. */ 
for (bpl = *bp0; bpl; bpl = bpl -> next) { 
str_eq(symbol, bpl -> name); 
if (2) { 
/* Match, */ 
aO = bpl -> text; 
dO = bpl -> nargs; 
move (Z BIT, ccr),; 


return; 
} 
} 
/* No match. */ 
move (NZ_ BIT, ccr); 
} End Listing One 
ht: ds.l 101 
lookup: 
movem.1 al/a2/d2, -(sp) ;function entry 
subg #4, sp 
move .l 20(sp), (sp) ;get the hash value into hash val 
jsr hash 
move.1 dO, d2 
move.l #ht, al ;point bpO into the hash table 
mulu #4, d2 
adda.1l d2, al 
: search down the list of buckets 
move.1 (al), a2 ;for(bpl = * bpO;...7...) 
bra _3 
une 
move.1 6(a2), (sp) ;str_eq(symbol, bpl -> name); 
move .1 20(sp), (sp) 
jsr str_eq 
addq #4, sp 
bnz 2 git (2) 
move, 1 6(a2), a0; a0 = bol -> text; 
move .W 4(a2), dO; dO = bpl -> nargs; 
move #4, ccr; move(Z BIT, ccr); 
bra _4 ; return; 
2s 
i move .1 (a2), a2 ;for(...7...;bp1 = bpl -> next) 
3s 
= empa.1 $0; a2 ¢for (...7. Bor: iss) 
bnz _l 
move #0, ccr ;move(NZ BIT, ccr); 
4: 
= addq #4, sp ;function exit 
movem.1 (sp)+, al/a2/d2 saith 
rts End Listings 
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PROMPT DELIVERY!!! 


SAME DAY SHIPPING (USUALLY) 


NV eyo) ows (eV OST ESR 
$16.00 





I 
















V20 CPUWUPD70108D-8 


$64 46 































s 8087-2 Math Coprocessors 140.00 

S DYNAMIC RAM . 
rem 206K = 64kx4 150ns = $4.75 ai 
mem 200K = 256Kx1 120 ns 3.25 fer 
Meme 256K = asekx1 150ns 2.47 Be 
em 8128K = 128kKx1 150ns 3.50 ts 
aa §=664K 16Kx4 150 ns 2.75 ia 
eRe 64K 64kx1 150ns 1.00 [Wee 
ia EPROM ray 
ees 27C256 32kx8 250ns $7.50 Fe 
Seem 627256) = 332kx8 250 ns 4.75 ie 
aeam §6©27C64 = 8kx8 ~200Ns 3.75 Ts = 
wai §862764 8Kx8 250 ns 2.50 fear 
ce STATIC RAM < 

N 


6264LP-158skx8 150ns $2.99 


OPEN 7 DAYS’ WE CAN SHIP VIA FED-EX ON SAT 


MasterCard/VISA or UPS CASH COD 
Factory New, Prime Parts Poco 


VERY MICROPROCESSORS UNLIMITED, INC. 
24,000 S. Peoria Ave., 
“th SAN BEGGS, OK. 74421 (918) 267-4961 
— Prices shown above are for Dec. 2, 1985 
Please call for current prices. Prices subject to change. Please expect higher or lower prices on 
some parts due to supply & demand and our changing costs. Shipping & insurance extra. Cash 


discount prices shown. Orders received by 6 PM CS can usually be delivered to you by the next 
morning, via Federal Express Standard Air @ $6.00, or Priority One @ $13.00! 












COST FOR 
F-EX SAT 
DELIVERY 
















Circle no. 105 on reader service card. 


TOTAL RECALL 
= 


FOR $104.95 


Now you can retrieve everything 
you entered during program 
development -- from version 
one thru all updates. SRMS 
does it with a completa 
source utlity at an af- 
fordable price. 

You can retrieve specific 
versions of a program, 
make changes and rein- 
state the source while 
recording when, why and 
where changes were made. 


All versions are stored ina 
single library without dupili- 
cation of common code or se 
text -- saves disk space. You can also store comments 
specific to each version -- provides complete develop- 
ment history and documentation of the program. 
SRMS supports recall and edit of programs written in 
BASIC, FORTRAN, PASCAL (including Turbo Pascal), 
C and ASSEMBLY CODE. 


Requires MS or PC DOS, Version 2 and up with 128K 
and one disk (floppy or hard). 


































: 2 7048 Stratford Road 
Quilt Computing Woodbury, MN 55125 
(612) 739-4650 





Circle no. 107 on reader service card. 


Finally... BSW-Make 


Now, an affordable and compatible implementation of 
the Unix “make” facility for MS-DOS and VAX/VMS. 


Eliminate bugs due to forgotten compiles! 


BSW-Make rebuilds your software quickly, correctly, and 
automatically after your editing session. 


MS-DOS: $89.95 


Every wasted compile costs 
you time. BSW-Make will 
save you time, and time is 
money. 


VAX/VMS: $495.95 


Why pay more? BSW-Make 
costs a fraction of DEC's 
MMS. BSW-Make will 
save you time and money! 


Prices include postage within the United States. Massachusetts 
residents add 5% sales tax. 
MasterCard and Visa accepted. = = 


The Boston Software Works 


120 Fulton Street * Boston, MA * 02109 « (617) 367-6846 


MS-DOS 's a trademark of MicroSoft Corp. VAX and VMS are trademarks of Digital Equipment Corp 
Unix is a trademark of ATT Beli Laboratones 





Circle no. 126 on reader service card. 


MULTITASKING OS LISTING 


(Text begins on page 44) 


Terra Nova Communications multi-tasking kernel 
Initialization and task-switcher 


Note: this is not intended to be a complete listing. It's only 
a sample of some of the techniques used in our system. 


=e “Se Sea Se Be Ve Ve 


PSECT Kernel 
; External symbols (defined in other code segments) 
EXTERN VecTable, zvector table for hardware vector list 
JMPTable, ;jump table for system calls 
JMPTabLen, zlength of ju mp table in longwords . 
KernEnd, zend of kernel code item in heap 
IOInit, your private I/O initialization routine 
HeapInit, your private heap initialization 
SysInit, zsystem variable initializer 
SysConMon, sentry point for system console 
zmonitor task 
HeapMunger, yentry point for heap munger task 
DiskMunger yentry point for disk munger task 
; Entry points in this module (referenced from elsewhere) 
ENTRY Start, sprimary entry point to boot our OS 
ConSwitch, smain context switcher 
ConSwSleep zalternate context switcher (puts 


;calling task to sleep) 


Include files (mostly equates) 


=e 


INCLUDE SysEqu ;contains the low-memory absolute 
yaddress equates (jump table, etc) 
INCLUDE HeapDef ;defines the heap data structure 
INCLUDE SysIO ;contains hardware I/O equates 
; Miscellaneous storage 
CodeHeap DS.L 8 zheap header for kernel heap item 
StackEnd DS.L 40 zsystem stack before tasking starts 
StackBegin DS.L 0 ztop of startup stack area 


Pre-tasking initialization 
this code works in single-task mode 
prior to the invocation of the context switcher 


oe Se Ne 


Start ;Initial entry. Calling operating system is still 
zalive and kicking at this point. 
TakeOver LEA ReEnt ry, Al ;point to re-entry instruction 
MOVE.L Al,$20.W zmove short absolute to the vector 
sfor privilege exceptions 
MOVE USP, AO ztry a privileged instruction. If it 


zworks, then we're in priv. mode. If not, then trap to 
;ReEntry and be in privileged mode anyway 
ReEnt ry LEA StackBegin, A7 zset up initial stack 


Turn off all interrupts in the system 

Note: this is device-specific code. 

The labels in the operand fields are from our own 
SysIO include file. 


=e Se Se Se 


CLR.B FDCIntMask ;clear floppy disk & system console 
CLR.B HDIntMask ;clear hard disk completion int. mask 
CLR.B SerIOlIntMask ;clear serial boards 

CLR.B SerIO2IntMask 


Initialize the vector table 
Copy the vectors from an assembled table (in another module) 
into the actual hardware vector list in low RAM 


=e “Se Ss 


LEA VecTable,A0 ;source (in another code segment) 
LEA $0O.W,Al ;destination (begins at $00 0000) 
MOVE #191,D7 7192 longwords to move 
VecMove MOVE .L (AO) +, (Al) + zmove a longword 
DBRA D7, VecMove ;repeat till done (fast loop on 68010) 


Copy system routine JMP table from assembled object code (in 

another module) to low memory jump table, where everyone 

can get at them. 

LEA JMPTable, AO 7; source 

LEA System.W,Al sdest. (name of first system call in 
sthe jump table. "System" is from the SysEqu include 
z;file. It's the context switcher) 


=e Se Se 


MOVE #JMPTabLen/4,D7 ;number of longwords to move 
JPTMove MOVE .L (AO) +, (Al) + ;move a longword 

DBRA D7, JPTMove ;repeat till done (fast loop on 68010) 
: Clear low memory to zero (between jmp table and kernel) 

LEA StackEnd,Al spoint to top of destination 

sand bottom of destination (end of the jump table) 

LEA System+JMPTabLen.wW, AO 

SUBA AO,Al ;calculate the length 

MOVE .L Al,D7 zmove to D7 for counting 

LSR.L #4,D7 sdivide by 16 for 16-byte blocks 
LowClr CLR.L (AO) + 7;clear 16 bytes, quickly 

CLR.L (AO) + 

CLR.L (AO) + 

CLR.L (AO) + 

DBRA D7, LowClr 7do it until done. 


Dr. Dobb’s Journal, January 1986 


Clear high memory to zero (between kernel and end of RAM) 
(RAMEnd is first byte beyond RAM, defined in SysEqu) 


“a Se 


LEA RAMEnd, Al ;point to top of destination 
zand bottom of destination (end of the jump table) 

LEA KernEnd, AO 

SUBA AO,Al 7calc the length 

MOVE.L Al,D7 7move to D7 for counting 

LSR.L #4,D7 ;divide by 16 for 16-byte blocks 
HiClr CLR.L (AO) + ;clear 16 bytes, quickly 

CLR.L (AO) + 

CLR.L (AQ) + 

CLR.L (AO) + 

DBRA D7,HiClr 7do it until done. 


Initialize all of the primary I/O devices 
Note: this is a device specific routine not treated in the article. 
JSR TOInit 


=e ‘\e 


Initialize the heap 

Note: this is a routine in the heap manager, which creates 
valid heap headers for the three initial heap items discussed 
in the text: the deletion below the kernel, the kernel code 
item, and the deletion above the kernel. 

JSR HeapInit 


Se Se Se Se Me 


Initialize the system zone of low memory 

Note: this sets up the TCB and master handle arrays, as 

discussed in the text, as well as initializing the time of day and 
the date and the other miscellaneous system values. 

JSR SysInit 


Se Se Se Ne 


Spawn off the initial tasks 
This will create TCBs and TData items for the tasks, but won't 
invoke them. They're invoked only by the context switcher. 





“e “a Se 


LEA SysConMon, AO ;point to system console entry point 
MOVE .L #4096,D0 ;tell it how much RAM for TData 
JSR Spawn ;jump through jump table entry 
7 ("Spawn" is a jump table equate in SysEqu) 
LEA HeapMunger,AO ;spawn the heap munger 
MOVE.L #512,D0 zheap munger's TData size 
JSR Spawn 
LEA DiskMunger, AO 7Spawn the disk munger 
MOVE .L #8192,D0 ; (TData includes one disk buffer) 
JSR Spawn 
LEA TCB1.W,A2 ;get address of first TCB in array 
7 (TCB1 is defined in SysEqu) 
BRA.S ConSwl snow start the context switcher! 
; Context Switcher: primary version 
: Simple task-switch, nothing fancy. 
5 SysFlags is a low-RAM system flag byte, defined in SysEqu. 
$ The data structure for the TData item is defined in SysEqu. 
: The data structure for the TCB is defined in SysEqu. 
ConSwitch BTST #StopSys, SysFlags.W ;task switching inhibited? 
BNE.S ConSwX zyes, exit back to caller 
MOVE .L OurTCB (A5) , AO ;get TCB address from TData 
SUBA.L A5, SP 7;subtract TData base addr from stack 
MOVE.L SP, TCBSP (AO) 7Ssave relative displacement in TCB 
MOVE .L TCBNxt (AO) , A2 zget address of next TCB 
ConSwl MOVE.L TCBAS (A2) ,A5 zget new TData base address 
MOVE .L TCBSP (A2) , SP 7get stack relative displacement 
ADDA.L A5, SP ;restore absolute address 
ConSwX RTS ;return to next task 
f Context Switcher: alternate version 
: Put the calling task to sleep. 
ConSwSleep BTST #StopSys, SysFlags.W ;task switching inhibited? 
BNE.S ConSwX zyes, exit back to caller 
;without going to sleep 
MOVE .L OurTCB (A5) , AO ;get TCB address from TData 
SUBA.L A5, SP ;subtract TData base addr from stack 
MOVE .L SP, TCBSP (A0Q) 7save relative displacement in TCB 
MOVE.L TCBNxt (AO) ,A2 ;get address of next TCB 
MOVE.L TCBPrev (AO0),Al ;get addr of previous TCB 
MOVE.L A2, TCBNxt (Al) 7Close the pointers around the now- 
MOVE .L Al,TCBPrev (A2) ;sleeping task. 
MOVE .B #Sleep,TCBState (AO) ;mark it as asleep 
MOVE .L TCBAS (A2) ,A5 7get new TData base address 
MOVE.L TCBSP (A2) , SP 7get stack relative displacement 
ADDA.L AS, SP ;restore absolute address 
RTS 7return to next task 


End Listing 
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8080 SIMULATOR 


LISTING ONE (Text begins on page 76) 


HEHEHE HEHE HEHEHE IE HE HEHE HEHEHE HEHE HE HE HEHE HE IE HE EH IE IE HEHE IEEE IE IE IE HEHE HE IE HE DE HE HE DE HEHE HE IE HE IEE DE HE HE HEHE HE EE HEHEHE HE EHH HK HEH 
* 


8888 Simulator for MC682202 


With CP/M 2.2 call support, optional tracing and 
Morrow HDDMA DMA buffer translating. 


Version 1.2 1/21/85 JEC 
Fixed Extent bug in OPEN logic. 
Sped up code, sample MAC from 2:13 to 1:48. 
Now runs at a 1.4 MHz equivalent based on MAC sample. 


Version 1.1 8/29/84 JEC 
Fixed BDOS call #6 bug. 


Version 1.8 05/25/84 by Jim Cathey 


This program has been written for speed wherever possible, 
as such tends to be large because of the separate subroutine 
for each and every opcode of the target processor. 


On an 8MHz 68224 (Compupro) system the simulation speed is 

a little better than a 1MHz 2-80 when running MAC. The time 
for a sample assembly was 2:13 for the simulation vs 8:35 

on a 4MH2 Z-88, both systems used identical hard disk systems. 


It is not a complete simulation, as some flag handling 
isn’t quite right, but it is enough to run the programs 
I wrote it for (DDT, LU, MAC, and Morrow’s FORMATMW). 


xx KK KK KK KK KK KK K KK KK KK KK K KK KK K *K 
x kx KK KK KK K KK KK K KK KK KK KK KK KK K KK K OK 


HEHE HE HEHEHE HE HE HE HEH HEHE IE IE HE HE DE IEE HE HE HE HEHE DE DE DE DEH HE DE DE IE DE IE HE HE HE HE HE HE SE 9G 9G HE HE HE 96-96 96 9696 EEE EE HE EEE EEE EIN 
text 
page 
HE He HE HE HE HE HE HE IE HE HE IE HEHE DE DE DE HE DE DE HE EE 3G IEE 9G DE HE HE FE IE IE IE IE HE EE 96 96 DE HE HE HE IE JE HE HE CDE DE DE HE HE EE DE DE HE IE HE EE 96 26 9 98 EEE 
* 


* 
* This file contains the startup routines, the simulator core, * 
* tracing code, and the CP/M 2.2 simulation. * 
* * 


HEHE HE IEE HEHE HOE IEE IE IE IE IE HE HE HEHE IE HE SE HE HE HE IE SE HE DE 3 3 HE 3 EE 9 EE 9 EE 9 HE IE IE IE HE IE 9 HEE IE EE 9 EE 3 DE IE IE IE HE IE HE EEE EK 


xdef optabl,flags,mnops 
globl mloop,illegl,service 


* 

* Conditional assembly flags. 

* 

trace equ 0 ; Non-zero for trace routine inclusion. 


tredsk equ 8 ; Non-zero for FCB trace routine inclusion. 
dmpdsk equ 8 ; Non-zero for register dump in FCB trace. 
* t! diskio is in file COM2.S !! 

*diskio equ 8 ; Non-zero for special HDDMA support. 


regcon&f equ 5,r 


Register based constant /$F. 
regconff equ 4,r 


Register based constant /SFF. 


* 
# Register definitions for the simulation. 
* 
return equ @16,r ; JMP (return) is fast return to MLOOP. 
pseudope equ @15,r ; 8682's PC is register AS. 
opptr equ @14,r ; Pointer to opcode dispatch table. 
pseudosp equ @13,r ; 8282's SP is register A3. 
flagptr equ @12,r ; Pointer to 8080's flag lookup table is A2. 
targbase equ @11,r ; Pointer to 8088's address space is Al. 
regs equ @11,r ; Base pointer to 8880's registers is Al. 
regconfe equ 7,r ; Register based constant #$E (for speed). 
regcon#1 equ 6,r ; Register based constant #$1. 
regf equ 3,r ; 8080's Flags 
rega equ 2,r ; 8880's Accumulator 
* 
* Note, only leaves D#-D1/A for free use by entire 
* program without saving registers for temporary use. 
* 
bdos .opd 8,$4e42 ; BDOS ‘macro’. 
bios .opd 6,$4e43 ; BIOS *macro’. 
page 
FE HE HEHE HE HE IE FE FE IE HE DE FE DE HE DE DE JE DE DE 3E SE SE HE HE SE DE DE DE 9E DE 9E DE SE DE SE FE FEE 9E HE SE SE IE FEE DE HE DE HEF 96 IE DE DE PE DE IE DE DE SE DE DE HE HE HE EE EEE EE 
* * 
* Initialization and Main Opcode dispatcher. * 
* * 


DEE HE HE IE FE DE IE DE EE SE SE DE HE DE FE DE DE DE 3E SE OE DE 9 DE 9E 5E 9E DEE DE DE DE-DE DE DE OE DE E 2 DE DE DE HE HE HE HE DE HE DEE HE HE EE IE IEE HEHE EH RH 


start lea.l target,targbase ; Start of target memory. 
ifne trace ; Optional trace code. 
bsr entrads ; Enter trace delimiting addresses 
* ; if the code is desired. 
endc 
bsr lodfdos ; Load up the fake FDOS in target mem. 
bsr lodregs ; Load the remaining simulation registers: 
bsr loadcom ; Load the .COM program, 
tst dé ; quit if unsuccessful. 
104 


bne optprnt 
rts 


optprnt equ * 
ifne trcedsk 


; If FCB tracing, print header. 
lea.1 fcbmsg,af 


bsr lpstr 

endc 
mloop: * ; Execute simulation 
““mloop: 

ifne trace ; Optional trace. 


tst traceflg 

bne dotrace 

cmpa.1 tracesad,pseudopc 

bne notrace 

move.b #1,traceflg 
dotrace bsr dump 

cmpa.1 traceead,pseudopc 

bne notrace 

move.b #0,traceflg 
notrace equ * 


endc 

moveq #0,d0 ; Execute appropriate simulation subroutine 

move.b (pseudopc)+,d@ ; Grab next opcode. 

asl #2,d0 ; (D8 high word is still 8!) 

move.l @(opptr,d.w) ,ad 

jmp (ad) ; To the subroutine. 

page 
3636 HE IE SESE IE SESE EE 9E SE IEE IE SE 96 HE IE 3 HE 36 EE 36 2 SE EE 96 SESE IE E93 3 IE 9 EE FE HE IE DE EE IE 9 36 DE 9 EE DEE IE OE 96 DE 9 EE IE 9 EE 9 EE IEE 
* * 
# Illegal instructions and Dumping. * 
* * 


HEHEHE HE IE HE IEE HE IE HE SE SE IE IE 36 HE SE SE HE IE IESE 3E HE 9E HE IE SE SE IE SEE 9E 9E HE SE IEE IE IE IE IE HE IE DE DE ESE IE HE IE IE IE HE IESE IE IE HE EH HE EEE HEE EK HE 


illegl move.1 #illgmsg,d1 
move.w #9,d0 

bdos 

lea.1 -1(pseudopc) ,af 
move.b (af) ,d1 
suba.l targbase,aé 
bsr pbyte 

move.1 #ilgmsg2,d1 
move.w #9,d0 

bdos 

move.1 af,dl 

bsr pword 

move.1 #ilgmsg3,d1 
move.w #9,d0 

bdos 

move.1 #dumpmsg,di 
move.w #9,d0 

bdos 

bsr dump 

rts 


; Illegal opcode, say what & where, 


; and spill guts. 
; Quit simulation. 


page 
movem.1 d-d1/a%,-(sp) 
move.] #dmpmsg2,d1 ; Dump all registers, 
move.w #9,d0 ; used for illegals and tracing. 
bdos 
move.b rega,d} 
bsr pbyte 
move.b regf,dl 
bsr pbyte 
bsr pspace 
move.w regb(regs) ,d1 
bsr pword 
bsr pspace 
move.w regd(regs) ,di 
bsr pword 
bsr pspace 
move.w regh(regs) ,di 
bsr pword 
bsr pspace 
move.1 pseudosp,d1 
sub.1 targbase,d1 
bsr pword 
bsr pspace 
move.] pseudosp,af 
swap d2 
move.w #£3,d2 
tosloop move.b 1(a),di 
ror.w £8,d1 
move.b 8(a@) ,d1 
bsr pword 
bsr pspace 
addq.l #2,a0 
dbra d2,tosloop 
swap d2 
move.1 pseudopc,d1 
sub.1 targbase,d1 
bsr pword 


dump 


; Save REGA 
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bsr pspace 
bsr pspace 
move.b (pseudopc) ,d1 
bsr pbyte 
bsr pspace ; Now show mnemonic 
bsr pspace 
moveq #0,d0 
move.b (pseudopc) , dd 
asl.w #2,d0 
lea.1 mnops,a@ 
move.1 (a@,d@.1),d1 
move.1 di,-(sp) 
inc.1 dl 
move #9,d2 
bdos 
move.1 (sp)+,a0 
cmp.b #” ", (af) 
beq nooprnd 
cmp.b #”"C”, (a®) 
bne notcons 
move.b 1(pseudopc),di 
bsr pbyte 
bra nooprnd 

notcons cmp.b #”A”, (aB) 
bne nooprnd 
move.b 2(pseudopc) ,di 
bsr pbyte 
move.b 1(pseudopc),di 
bsr pbyte 

nooprnd bsr pspace ; In case of conout calls during trace, 
bsr pspace ; they will be visible at end of line. 
bsr pspace 
movem.1 (sp)+,d@-d1/ad 
rts 


page 

EAE HEHE IE IE HE FE HE IE HEE HE DE IE FEE IE DE HE DE HE IE 3E EE IE DEE 3 EE 3 EE EE DE EE 96 3 EE IE EE 9G 9 9 IE 38 96 96 38 EEE EEE EEE EEE EEE IEE 
* 

* Initialization subroutines. 

* 

HE HE IE HE HE IE HE DE IE HE SE DE IE HE HE DE DE DE IE JE HE DE DEE FE SE DE DE-DE DE DE DE 96 3E HE HE DE DE OE SE DE DE DEE HE DE DE HE IE IE SE DE HE DE HE IE IE DE IEE DE DEE EEE EE EH 


* 


lodfdos lea.l fdos,a6 ; Load up the fake FDOS. 


Sidekick for CP/M! 


Write-Hand-Man 


Desk Accessories for CP/M 
NEW! Now with automatic screen refresh! 


Suspend CP/M applications such as WordStar, dBase, and 
SuperCalc, with a single keystroke and look up phone 
numbers, edit a notepad, make appointments, view files and 
directories, communicate with other computers, and do 
simple arithmetic. Return to undisturbed application! All 
made possible by Write-Hand-Man. Ready to run after a 
simple terminal configuration! No installation required. 


Don’t be put down by 16 bit computer owners. Now any 


CP/M 2.2 machine can have the power of Sidekick. 


Bonus! User extendable! Add your own applications. 


$49.95 plus tax (California residents), shipping included! 
Volume and dealer discounts. 


Available on IBM 8 inch and Northstar 5 inch disks. Other 5 
inch formats available with a $5.00 handling charge. CP/M 2.2 
required; CP/M 3 not supported. 


COD or checks ok, no credit cards 
Poor Person Software 
3721 Starr King Circle 
Palo Alto, CA 94306 
tel 415-493-3735 
Write-Hand-Man trademark of Poor Person Software, CP/M trademark of Digital 


Research, Sidekick trademark of Borland International, dBase trademark of Ashton-Tate, WordStar 
trademark of Micropro, SuperCalc a trademark of Sorcim. 


Circle no. 169 on reader service card. 
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entrads move.) “#tracemsg,d! 


move.l targbase,pseudosp 
adda.1 #$12220,pseudosp 
lea.1 -256(pseudosp) ,af 
move.w #fdoslen,d@ 


lodloop move.b (a6)+,(ad)+ 


dbra d0,lodloop 

lea.1 -256(pseudosp) ,ad 
move.1 af,d0 

sub.1] targbase,d@ 
move.b #$c3,O(targbase) ; Build BIOS & BDOS jumps. 
move.b #$c3,5(targbase) 
move.b d0,6(targbase) 
rol.w #8,d0 

move.b d@,7(targbase) 
rol.w #8,d0 

add.w #3,d0 

move.b d0,1(targbase) 
rol.w #8,d0 

move.b d@,2(targbase) 


move.w #0,-(pseudosp) ; Set up a return stack to exit simulation. 
rts 


lodregs lea.1 optabl,opptr ; Point base register to opcode dispatch 


table. 
lea.1 mloop,return 
lea.l flags,flagptr 
move.1 targbase,pseudopc 
adda.1 #$108,pseudope ; Start execution at 0100H in target space. 
movegq #Se,regconle ; Set up quick constants. 
moveq #$1,regcon®1 
moveq #$f,regconéf 
move.] #$ff,regconff 
moveq #0,rega 
moveq #2,regf 
rts 


page 
Enter trace address if necessary. 


move.w #9,d0 
bdos 


(Continued on next page) 





Want unparalleled ee and Bicksies from 
your Macintosh? Get — 


TheMax: a 1.5Mb memory — 
board designed to expand 


toa full 4Mb of power, plus © 


MaxRAM: software to configure your memory 
two ways: 1Mb of contiguous memory with 
400K RAM disk or a 512K Mac with a recover- 
able 1024K RAM disk, and | 
MaxPrint: print spooler software that lets you 
work and print at the same time. - 


TheMax is available now for both the 128K 
and the 512K Macintosh. Kits and 512K up- 
grades are also available. Ask your dealer for 
more information, or contact — 2 


MacMemory Inc. 
473 MACARA AVE., SUITE 701, SUNNYVALE, CA 94086, - 
(408) 773-9922. 


Macintosh is a trademark licensed to Apple Computer Inc. 





Circle no. 218 on reader service card. 
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8080 SIMULATOR 


LISTING ONE (Listing Continued, text begins on page 76) 


—_— kK K K X 


oadcom 


filelod 


basepg 


fcbloop 


taill 


tail2 


tail3 


openerr 


loaded 


bsr atol 

and.l #$ffff,d1 
move.l di,a@ 
adda.1 targbase,aB 
move.] a®,tracesad 
move.] #tracemg2,di 
move.w #9,d0 

bdos 

bsr atol 

and.1 #$ffff,di 
move.1 di,a@ 
adda.1 targbase a0 


move.1] a%,traceead 
move.w #10,d1 
move.w #2,d0 

bdos 

move.w #13,d1 
move.w #2,d0 

bdos 

rts 


Get trace start address. 


Get trace end address. 


CRLF to end line. 


OPEN file to be loaded, and load it into target 


space if successful. 


link a6,40 


movem.1 d2-d3/a2-a4,-(sp) 


move.l 12(a6),a@ 
lea.l $5c(a®) ,a2 
move.b #'C' ,9(a2) 
move.b #'°0', 18(a2) 
move.b #'°M’,11(a2) 
move.l a2,d1 
move.w #15,d0 
bdos 

cmpi.w #255 ,d0 

beq openerr 


move.] pseudopc,d2 
move.] d2,d1 
move.w #26,d0 
bdos 

move.1 a2,d1 
move.w #20,d0 
bdos 

tst dé 

bne basepg 
add.l #128,d2 
bra filelod 


lea.1 $80(targbase) ,a2 
move.l a2,di 

move.] a2,dmaaddr 
move.w #26,d0 

bdos 

lea.1 $38(a0),a2 

lea.1 $5c(targbase) ,a3 
move.w £36,d0 

move.b (a2)+,(a3)+ 
dbra d@,fcbloop 

lea.1 $88(a8),a2 

lea.1 $80(targbase) ,a4 
lea.l] $81(targbase) ,a3 
clr dé 

move.b d@, (a4) 

move.b (a2)+,d0 

cmp.b #$20,(a2)+ 

dbeq d0,taill 

bne loaded 

cmp.b #$20, (a2)+ 

dbne d#,tail2 

beq loaded 

dec.1 a2 

subq #2,d0 

move.b (a2)+,(a3)+ 
inc.b (a4) 

dbra d@,tail3 

move.b #0, (a3) 


bra loaded 

move.1 f#opnmsg,d} 

move.w #9,d0 

bdos 

clr dé 

movem.1 (sp)+,d2-d3/a2-a4 
unlk a6 

rts 

page 


- Mark stack frame. 


; Get the address of the base page. 


Get FCB address. 
mash filename to .COM 


OPEN file. 
ERROR? 


Start loading at $0100 in target. 
Set DMA address. 


Read file until EOF. 


Set up the target’s base page. 
Start with default DMA address. 


Copy host's 2nd FCB to target’s 1st FCB. 


Grab command tail from host’s buffer. 
Hack off ?.COM filename. 


If there's any tail left, then 


remove leading whitespace. 


Move the rest of the tail. 


Can’t open file. 


Trantor. 


HEHE HE HEHE IE HE HE IE IE HE IE IE HE IE DE IE FE IE IE HE HE IE IE HE DE DE DE DE HE IE DE SE DE HE DEE DE 5E DE 9 DE 36 DE 9 HE HE 9E 3E HE OE DE HEE 5K HE IE 9G HE IE DE EE HEE EE EEE EEE 


* 
* 
* 


* 


BIOS and BDOS service request handler. * 


* 


FE HE HE DE HE HE IE HE FE IE IE FE HE HE DE HE FE DE HE DE HE DE HE DE IE SE IE DE 9 EE 3E IE 4 IE EE 3E IEE IEE DE DE DE 9E SE IE ED EE 9E IE HEE EE HE IE HEE EEE EEO 
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service 


bdosfn 


badbdos 


okbdos 


noconv 


notdma 


fcb 


fcb1 


notopen 


moveq 40,40 

move.b (pseudopc)+,d& 
bne biosfn 

moveq #0,d1 

move.b regc(regs) ,d@ 
move.w regd(regs) ,d1 
cmp #31,d0 

beq badbdos 

cmp #27,d8 

bne okbdos 

move.l #ilgbdos,di 
move.w #9,d0 

bdos 

bsr dump 

bra quitprg 


cmp #9,d0 

blt noconv 

cmp 414,d0 

beq noconv 

cmp #32,d0 

beq noconv 

cmp #37,d0 

beq noconv 

add.1 targbase,d1 
cmp #26,d0 

bne notdma 
move.1] di,dmaaddr 
move.b #2£,fcbflag 
cmp #15,d0 

blt notfcb 

cmp 424,d0 

blt feb 

cmp #38,d0 

beq fcb 

cmp #33,d0 

blt notfcb 

cmp #37,d0 

blt fcb 

cmp #48,d0 

beq fcb 

bra notfcb 


page 

swap d2 

move.w #35,d2 
move.l di,a@ 
move.l ai,-(sp) 
lea.l fcbstor,al 
move.b (a®)+,(al)+ 
dbra d2,fcbi 
move.] (sp)+,al 
lea.l fcbstor,a% 
move.b 33(a®) ,d2 
move.b 35(a®) ,33(ad) 
move.b d2,35(af) 
swap d2 

move.b #1,fcbflag 
move.1 di,-(sp) 
move.1 a,di 

ifne trcdsk 

ifne dmpdsk 

bsr dump 

endc 

endce 

cmp.w #15,d0 

bne notopen 

tst.b 12(aB) 

beq notopen 

bsr openproc 

bra results 


““notopen: 


notfcb 


notdcon 
results 


ifne trcdsk 
move.1 d2,-(sp) 
move.b #' ',d2 
bsr fcbtrei 
move.l (sp)+,d2 
endc 


cmp 46,d0 

bne notdcon 
cmp.b #$ff,di 
bne notdcon 
move.w #$fe,di 
bdos 

tst dd 

beq results 
move.w #6,d0 
move.w #SFF,d1 


bdos 
move.w dé,regh(regs) 
move.b d#,rega 


Handle BIOS/BDOS service request 
of form HLT DB opcode. 
BDOS or BIOS? 


Get BDOS function number. 
Get argument. 
Can’t do Disk Parm Hdr function 


=e we 


we 


or ALLOC vector fn. 


Translate target address to real address. 


-« 


Save last known DMA address 
(in case of OPEN processing). 


Separate FCB type requests 
from the rest of the swine. 
(Assume not, at first). 


Move the FCB to host working buf, 


and swap the random record bytes 
to make them match the 68220's. 


Set flag for proper recovery. 
(Gotta put the pig back in pen!) 


Optional*2 Register dump. 


OPEN has a problem in that CP/M-68K 
can only open the base extent, unlike 
CP/M-88. So we have to check and do 
an OPEN then SEEK (RREAD) if required. 


Optional FCB trace. 


Not an FCB request. Is it 
a direct console I/O function? 
Yes, make host’s look like target's. 


FINALLY? 


Do the translated function. 
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move.b regh(regs) ,regb(regs) 

tst.b fcbflag ; Do we need to restore a FCB? 

beq done 

ifne tredsk 

bsr febtrc2 

endc 

lea.l fcbstor ,ad 
order. 

swap d2 

move.b 33(a8),d2 

move.b 35(a0) ,33(ad) 

move.b d2,35(aB) 

move.1 (sp)+,a0 

move.l al,-(sp) 

lea.l fcbstor,al 

move.w #35,d2 

move.b (al)+,(a)+ 

dbra d2,fcb2 

swap d2 

move.] (sp)+,al 

move.b rega,d@ 

and.w regconff,d@ 

move.b O(flagptr,d@.w) ,regf 

rts 


fcb2 


done 


openproc: 

““openproc: 
ifne trcdsk 
swap d2 
move.b #’ ',d2 
bsr febtrcl 
swap d2 
bsr fcbtrce2a 
endc 


; Optional FCB trace. 


move.b 33(a®),-(sp) 
move.b 34(a) ,-(sp) 
move.b 35(a®),-(sp) 
movem.1 d&@-d2,-(sp) 
moveq 40,d2 

move.b 12(a@),d2 
clr.b 12(aB) 


; Save away RR fields! 


; Save desired extent. 








; Restore the FCB to target, in proper 


bsr fcbbdos 

tst.b dd 

bmi badopen 

asl.l 47,d2 

moveq #0,d0 
move.b 32(a®) ,d@ 
belr £7,d0 

add.l d2,d@ 
move.w d@,34(aB) 
swap dé 

move.b d0,33(aB) 
move.1 #junkbuf,d1 
move.w #26,d8 
bdos 

movem.1 (sp)+,d@-d2 
move.w #33,d0 

bsr fcbbdos 

clr dé 


Do BDOS (with opt. tracing). 


No seek if not good OPEN. 
Make EXTENT # into record offset. 


; Add onto CR to make abs record #. 
Put into FCB. 


Set DMA addr elsewhere for Rand Seek. 


Random READ (SEEK) desired extent. 
Do BDOS (with opt. tracing). 
(OPEN) must always be successful because 


of the way CP/M-88 & CP/M-68K differ 
; on OPENing non-zero extents. 
Restore the proper DMA address. 


movem.1 d@-d1,-(sp) 
move.w #26,d0 
move.] dmaaddr,di 
bdos 
movem.1 (sp)+,d0-d1 
restore move.b (sp)+,35(a) 
move.b (sp)+,34(a®) 
move.b (sp)+,33(aQ) 
rts 


Restore RR fields. 


badopen movem.1 (sp)+,d0-d2 
bra restore 


fcbbdos: 

~~“fcbbdos: 
ifne trcdsk 
move.1 d2,-(sp) 
move.b #’+' ,d2 
bsr fcbtrcl 


BDOS call with optional FCB trace. 


(Continued on next page) 


access by simply choosing the appropriate search "key". With our 


Write 1/3 the code with CCSM, the Database Language! 





program in 
program in BASIC or 
CCSM, the PASCAL 
Database Language 


Only $59.95 for IBM PC! 
Only $89.95 for Macmumps! 


Dramatically increase your programming productivity with CCSM, 
the Database Language™. If you're now wniting programs in BASIC 
or PASCAL, you'll be writing about 1/3 the code with this compact, 
productive language. 


CCSM, the Database Language™, developed by COMP Computing, 
iS a proprietary version of ANSI Standard MUMPS. 

MUMPS as a language has been refined and developed for the past 
20 years, and is used in corporate America, and by countless 
thousands around the world, who must manage large, complicated 
filing systems. With CCSM, the Database Language™, you won't be 
restricted with different "dialects", as you are with BASIC. CCSM, 
the Database Language™, will transport directly from your 
microcomputer, to a mini or mainframe WITHOUT MODIFICATION! 


A "Database Language" Is The Answer 


CCSM, the Database Language™, is "type-less", so you can use 
variables "on the fly", without the tyranny of type declarations, 
such as found in even the "souped-up” versions of PASCAL. The 
system transparently converts words and numbers to their real 
function, so you can add up inventory, or multiply commissions, or 
check on customers. Variables are written in plain English, such as 
"vendor", "cost", or "product". There are no line number 
conventions, but you may use plain English labels for reference to 
subroutines. CCSM, the Database Language™, doesn't make you 
decide when to use "sequential" files, or "random" files. Every 
record is stored in a "B-tree” file.- So, you have virtually instant 


"B-tree" files, you have variable length keys, and data, and you never 
have to restructure or re-sort your files. The "B-tree" record structure 
serves as temporary AND permanent storage, so you never have to 
worry about DIMensioning an array, because the records ARE the 
array. They're stored on disk for your immediate use. So, unlike 
BASIC, you never have to "GET" or "PUT", to store, retrieve or 
manipulate your data. 


All The Goodies...Graphics, Too! 

CCSM, the Database Language™, utilizes virtual memory, so 
programs or local variable sizes can expand to the size of the disk. 
CCSM, the Database Language™, has built-in error checking, 
full-screen editor, and sophisticated buffer pooling for faster per- 
formance, than RAM-disk alternatives. 8087 and BCD support, too. 


Easy-to-Learn With Complete Documentation 

You get a 250-page manual, with every chapter designed to lead you 
step-by-step through the language. The section "Introduction to 
MUMPS" is especially helpful, in making an easy-to-learn language, 
even easier. Through Mar. 3], 1986, you can order "The Cookbook 
of MUMPS", with its own disk of routines, and utilities, for only 
$15.95 (reg. $24.95). For an additional $49.95, you can order the 
graphics disk, to create fancy charts and graphs. There is a multi-user 
package (up to 15) available, for $450. All are non-copy-protected. 


Stop Kludging, and Start Computing! 
Database solutions are as close as your phone. Call Guidance 
Software now, and get CCSM, the Database Language™. You'll need 
an IBM PC, IBM compatible or Apple Macintosh with at least 128K. 


1 -800-257-8052 in Texas, (713) 529-2576 


AMEX, VISA or MC 
Guidance Software, PO Box 5362, Kingwood, Texas 77325 


OCSM, the Database Language™ is $59.95 ($89.95 for Macintosh), including the disk 
and 250 page manual..Get both language and utilities disks, along with "The Cookbook of 
MUMPS" for $75 90 ($105 90 for Macintosh). for graphics disk, add $49 95..include 


$3.00 for shipping and handling... Texas residents add 6 1/89o tax. 


IBM PC isa trademark df International Business Machines; Macintosh is a trademark of Apple Computer; OC SM, the Database Language & Macmumps are trademarks of COMP Campuing. 
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8080 SIMULATOR 


LISTING ONE (Listing Continued, text begins on page 76) 


move.l (sp)+,d2 
endc 

bdos 

ifne trcdsk 

bsr febtrce2 
endc 

rts 


biosfn cmp #1,d8 
beq quitprg 
cmp #$f,d0 ; 
beq gudbios 
cmp 47,400 
bge badbios 
gudbios clr.w dl 
move.b regc(regs) ,di 
movem.1 d2-d7/a®-a6,-(sp) 
bios 
movem.1 (sp)+,d2-d7/a-a6 
move.b dé,rega 
rts 


; Handle Bios calls. 


List Status is ok. 


; Don’t allow disk functions! 


badbios move.b d@,-(sp) . 
move.l] “#biosmsg,dl ; 
move.w #9,d0 
bdos 
move.b (sp)+,d1 
bsr pbyte 
move.1 #biosmg2,dl 
move.w #9,d0 


Flag illegal BIOS call 
and spill guts. 


bdos 

bsr dump 
quitprg move.1 (sp)+,d0 ; Trash return address and 

rts ; quit simulation. 

page 
9636 36 36 96-9 36 FEE HE HE 96 DE 9 96 96 DE IE 9 9 9-9-3 3 36 38 26 EE JE EE 98 0 EE 90 EE DE 9 90 90 9 90 9 EE EE EE 6 EE 96 98 90 98 98 9 90 EE EE 96 EE 9 9 2 HE 
* * 
* FCB Tracing support routines. * 
* * 


36 HE IE HE IE FE HE IE HE IE HE DE IE EE IEE IE 9 HE 9-96 HE 9-9 SE DEE IE 3 98 SE 9 36 08 EE 9 9 EE 9E ESE FE FE HE 96 9 3E 9 9 FE JE DE DE 98 98 SESE HE EE 9 OEE HE 98 8 EEE 


ifne trcdsk 
movem.1 d@-d2/a%,-(sp) 
move.b #9,d1 

bsr lpchar 
move.w d0,d1 

bsr lpbyte 
move.b d2,d1 

bsr lpchar 

bsr lpspace 

bsr lpspace 
move.b (a)+,d1 
bsr lpbyte 

bsr lpspace 
move.w #16,d2 
move.b (a@)+,d1 
bsr lpchar 

dbra d2,fcbtr1 
bsr lpspace 
move.w #3,d2 
move.b (a#)+,d1 
bsr lpbyte 

bsr lpspace 

dbra d2,fcbtr2 
bsr lpspace 

bsr lpspace 

lea.1 16(aB),aB 
move.w £3,d2 
move.b (af)+,d1 
bsr lpbyte 

bsr lpspace 

dbra d2,fcbtr3 
bsr lpspace 

bsr lpspace 
move.1 dmaaddr,di 
sub.1 targbase,d1 
bsr lpword 

bsr lpspace 
movem.] (sp)+,d8-d2/ad 
rts 


fcbtrcl Dump to printer each FCB usage 

in format FN #, Disk, Name (ASCII) 
and the rest, all in hex but the 
name field. Print the returned 
value after the FCB. 


Char in D2 is printed after FN #. 


fcbtr1 Print Name field... 


fcbtr2 


Skip d@..dn field. 


febtr3 s-Ur.. RZ 


page 

fcbtrc2 movem.1] d@-d1,-(sp) 
bsr lpspace 

bsr lpspace 

move.b d@,d1 

bsr lpbyte 

move.b #18,d1 

bsr lpchar 

move.b #13,d1 

bsr lpchar 


movem.1 (sp)+,d@-d1 
rts 


; Line termination of FCB trace. 


febtr21 
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febtre2a: 
movem.l d0-d1,-(sp) 
bra fcbtr21 


; Line termination if no result 
; is to be presented. 


endc 

age 
HEHEHE IE IE HEHE HE HE IE FE IE FE IE IE HE IE DE IE FE IE HE IE SE SE HE HE FE IE 3E 96 DE HE EE 5G SE SE DE HE EE HE IE HE HE FE IE HEE HE EE IE HE IE IE EE HE IE HE EE HE EE EE EK 
* * 
* Misc. service routines. # 
* (Inelegant, but rarely used so they stand as is). * 
* * 


36 HIE HE IE IE IE HE IE HE HE IE HE IE IE IE HE IE HE FE HE FE HEE IE HE IE HE IE IE IE HE HE HE DEE DE HE IEE 9 HE DEE DE DE DE DE HE FE IESE HE JE DE 3E HE DE DE SE IE SE IE IE HE HE IE DE IE HE HE HE 


pbyte move.1 #$20018,d0 ; 2 nybbles, 24 bit shift first. 
bra pdigits 

pword move.l #$40018,d0 ; 4 nybbles, 16 bit shift first. 
bra pdigits 

paddr move.l #$60008,d0 ; 6 nybbles, 8 bit shift first. 
bra pdigits 

plong move.1] #$80002,d0 ; 8 nybbles, no shift first. 


pdigits rol.1 d6,d1 

bra pdigent 
pdiglop swap d@ 

rol.l #4,d1 

bsr ntoa 
pdigent swap d# 

dbra d@,pdiglop 

rts 


; Do shift. 


; Save nybble count. 
; Print variable in di. 


; Get nybble count. 





ntoa movem.1 dé-d1,-(sp) 
and #$f,d1 

cmp #$a,di 

blt ntoa2 

add.b #'A’-'9'-1,d1 
add.b #'8' di 
move.w #2,d0 

bdos 

movem.1 (sp)+,d0@-d1 
rts 


; Nybble in di to ASCII, then output. 


ntoa2 


pspace move.w #32,d1 
move.w #2,d0 
bdos 


rts 


; Print a space. 


page 


* 


% Line Printer versions of above 
Me 


lIpbyte move.1 £$20018,d0 
bra lpdigts 
move.1 #$420010,d0 
bra lpdigts 
move.l #$60008 , dé 
bra lpdigts 
lplong move.1 #$80008,d0 
[pdigts rol.1 d@,d1 

bra lpdgent 
l[pdiglp swap dé 

rol.l 44,41 

bsr Intoa 
lpdgent swap dé ; 

dbra d@,lpdigip 

rts 


; 2 nybbles, 24 bit shift first. 


lpword ; 4 nybbles, 16 bit shift first. 


lpaddr ; 6 nybbles, 8 bit shift first. 


; 8 nybbles, no shift first. 
; Do shift. 


; Save nybble count. 
; Print variable in di. 


Get nybble count. 


lIntoa movem.1 d#-d1,-(sp) : 
and #$f,d1 

cmp #$a,d1 

blt lntoa2 

add.b #’A’-'9'-1,d1 
add.b #'8',dl 

move.w #5,d0 

bdos 

movem.1] (sp)+,d@-d1 

rts 


Nybble in di to ASCII, then output. 


lntoa2 
lntoa3 


lpchar movem.] d@-di,-(sp) 


bra lntoa3 


; Print a character. 


lpspace movem.1 d&é-d1,-(sp) 
move.w #32,d1 


; Print space. 


bra lntoa3 
page 
* 
* Remaining misc. service routines. 
* 
Ipstr movem.1 d#-d1,-(sp) ; Print a null-terminated string. 
lpstri move.b (af)+,d1 


beq lpstr2 
bsr lpchar 
bra lpstr} 
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lpstr2 


konin 


atol 


atoll 


atol2 


atol3 


atol4 





atolend 


movem.1 (sp)+,d8-d1 


rts 


move.w #1,d0 
bdos 
rts 


moveg #0,d1 
clr d2 

bsr konin 
cmp.b £$40,d0 
blo atol2 

and #$5F dé 
cmpi.b #'0’ , dO 
blo atolend 
cmpi.b #'F’ dé 
bhi atolend 
cmpi.b #'9',d@ 
bls atol3 
cmpi.b #'A’,dO 
bhs atol3 

bra atolend 
moveg #1,d2 
sub.b #'8' , dé 
cmp.b #$9,d2 
bls atol4 


; Console input for ‘atol’. 


; ASCII to long, stops on invalid hex char. 
Returns long in di, terminator char in dé, 


; Mask to upper case. 
; Check range (0..9,A..F). 


; Valid characters entered, flag it. 


sub.b #'A’-'9'-1,d8 


ext dd 
ext.1 dé 
asl.l #4,d1 
add.l d@,d1 
bra atoli 
rts 


page 
data 


; To long. 


; Tack it onto D1. 


d2=1 if any chars entered before terminator. 


even 
regops equ -9 ; Operand 1 for DAA storage. 
regb equ -8 ; Offsets from register base pointer for 
rege equ -7 ; 8080's pseudo-registers. 
regd equ -6 ; A & F are in Data Registers. 
rege equ -5 ; Pseudo-PC is kept in an Address Register. 
regh equ -4 
regl equ -3 
regopi equ -2 ; Operand 1 for DAA storage. 
regop2 equ -j : ” 2 ” ” ” 
febstor ds.b 36 ; Host works FCB’s out of here. 
fcbflag ds.b 1 ; Flag says we used the FCB buffer. 
even 


tracesad ds.l 1 
traceead ds.l } 
traceflg ds.w 1 


Trace start address. 
Trace end address. 
Tracing enabled flag. 


dmaaddr ds.1 1 ; DMA address storage. 


IE HE HEHE HE IE HE HE HE HE HE HE HE SE HE 9 HE HE HE IE SE IE IE SE DE DE SE SE IE 9 E936 98 3-58 5K 3E HE IE 3E SEE DE 9E 56 SE 36 EE 36 E96 36 56 3 33 EE EEE 36 EE 9 IEEE 


* * 
* Target processor's data registers. * 
# Fake FDOS. * 
* * 
IE HE IE IE IE IE HE IE HE HEHEHE HE FE IE FE IE FE IE DEE IEE DE BE IE IEEE EE EE E39 EE EE 9 EE 9 9 9 EE 9 EEE EEO 


page 
fdos dc.b $76,8,$C9 ; Fake BDOS for target system. 
* ; BIOS Jump Table 

dc.b $C3,$33,$FF ; Wboot 

dc.b $C3,$36,$FF ; Const 

dc.b $C3,$39,SFF ; Conin 

dc.b $C3,$3C,$FF ; Conout 

dc.b $C3,$3F ,SFF sList 

dc.b $C3,$42,$FF ; Punch 

dc.b $C3,$45,$FF ; Reader 

dc.b $C3,$48,$SFF ; Home 

dc.b $C3,$4B,$FF ; Seldsk 

dc.b $C3,$4E,SFF ; Settrk 

dc.b $C3,$51,$FF ; Setsec 

dc.b $C3,$54,$FF ; Setdma 

dc.b $C3,$57,$FF ; Read 

dc.b $C3,$5A,$FF ; Write 

dc.b $C3,$5D,$FF > Listst 

dc.b $C3,$60,$FF ; Sectran 


(Continued on next page) 





d/MULTI 


_— dBASE 
or 
TurboDOS 


TRUE File and Record Locking as easy as 
d-BASE-II. Unlimited users can perform the 
magic of dBASE in the program or 
interactive mode 


* TurboDOS 1.3 or 1.4 

* No Peeks or Pokes 

* System Date and Time Functions 

* Printspooler Controls up to 16 printers 


Martian Technologies... 
-CREATEing Multi-users from 
Single-users around the world 


CALL FOR DETAILS 


Martian Technologies 
8348 Center Dr., Ste.-F, La Mesa, CA 92041 
(619) 464-2924 





Circle no. 189 on reader service card. 


Dr. Dobb’s Journal, January 1986 








Multi-line functions 
No runtime fee 
Handles interrupts 
Fast native code 


MTBASIC is easy to use since you can write programs in an inter- 
active environment and then compile them using only one com- 
mand. MTBASIC has many advanced features like multitasking, 
random file access, formatted I/O, assembly language calls, and 
ROMable code. 


The MTBASIC package includes all the necessary software to 
run in interpreter or compiler mode, an installation program (so 
any system can use windows), demonstration programs, and a 
comprehensive manual. 


Now available with 
8087 Support! 


MTBASIC 


Basic Compiler 


MTBASIC is available for CP/M, MS-DOS, and PC-DOS systems 
for $49.95. MTBASIC with 8087 support is available for MS-DOS 
for $79.95. Shipping is $3.50 ($10.00 overseas). MD residents 
add 5% sales tax. MC, Visa, checks and COD accepted. 








Features: 

Multitasking 
Windowing 
Interactive 

Compiles in seconds 













Ordering 







aa\e a DY are 





P.O. Box 2412 Columbia,MD 21045-1412 
301/792-8096 
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8080 SIMULATOR 


LISTING ONE (Listing Continued, text begins on page 76) 


dc.b $76,1,$C9 ; Fake BIOS for target system 

de.b $76,2,$C9 ; Const 

dc.b $76,3,$C9 » Conin 

dc.b $76,4,$C9 ; Conout 

dc.b $76,5,$C9 > List 

dc.b $76,6,$C9 ; Punch 

dc.b $76,7,$C9 ; Reader 

dc.b $76,8,$C9 ; Home * 

dc.b $76,9,$C9 ; Seldsk * 

dc.b $76,18,$C9 ; Settrk * 

dc.b $76,11,$C9 ; Setsec * 

dc.b $76,12,$C9 ; Setdma * 

dc.b $76,13,$C9 ; Read * 

dc.b $76,14,$C9 ; Write * 

dce.b $76,15,$C9 s Listst 

dc.b $76,16,$C9 ; Sectran * 
fdoslen equ *-fdos 

page 
36 HEE HEE DE HE IE SE IE FEE IE HE SEE EE 9G 3696 DE 9E 9 36 IE EE 26 96 9E SEE DEE 9E HE 9G 96 96 E26 20 26 HE 2 EE 3 DE DE DE DE DE DEE 9E 8 DE DE IE HE 9 EE EE EE EEE 
* * 
# Messages. . 
* * 


HEE IEEE IE IE IE HE HEHE IE IE DE DE SE SEE IE 9E 96 E36 96 36-36 30 38 EE 96 90 38 96 98 98 98 9 9 9 96 9 9 EE EE EE 9 IE IE 9 2 9 9 IE 9 9 IE 9 IE IE IE HE HEE EEE 


illgmsg dce.b $d,$a,’Illegal instruction $’ 


ilgmsg2 dc.b * at $’ 
ilgmsg3 dce.b '.$’ 
dumpmsg dc.b $d,$a, Register contents:$’ 
dmpmsg2 dc.b $d,$a 
dc.b '-AF- -BC- -DE- -HL- -SP- -S@- -S1- -S2- -S3- -PC- -op-’,$d, 
$a,'$' 


biosmsg dc.b $d,$a,'Illegal BIOS call $’ 

biosmg2 dc.b '.$' 

tracemsg dc.b 13,10,’Start trace at >$’ 

tracemg2 dc.b 13,18,’End trace at >$’ 

opnmsg dc.b 'Cannot open .COM file.$’ 

ilgbdos dc.b ‘Unsupported BDOS call.$’ 

fcbmsg dc.b 9,’Fn# Dr NAME EX S1 S2 RC 
, 18,13 


CR RO R1 R2 = Addr Rslt’ 


HEHE IE HE IE IE IE IE HEHE IE HE HE SESE IE 9G 9E 3E DE 96 36 EE 96 9 96 E998 9 96 36 EE 9G 9 98 EE 9 9 DE EE DE DE DE IE 9 EE DE 9 EE DE 9 9 9 EE EE EE 9 EEE IEE HE 


* * 
* Target processor's address space. % 
* * 


FOR BRBEREERO REI REHEEIEBO BE OEOIOEE IEAIE EEE E 


even 

registers ds.b 18 

target ds.b $10000 

junkbuf ds.b $88 
.end 


; Actual storage for 8088's other registers. 
; 8080's universe. 
; For BDOS’ OPEN faking (RREAD buffer). 


End Listing One 


LISTING TWO 


HEHEHE HEE HEHE HE IE HEHEHE HE IEE HEE IE HE IE HE DE HE IE HE HE DEE DE EE DE DE DE HE EI BE HE EEE DEE IE HE HEHE HE IE IE DE HE IEE FE HE HEHE HEE HE HE HEE HEHE HHH 
* 


* 
* This file contains the target processor (8088) simulation * 
* routines. * 
* * 


96 HE HE HE HE HE HE HE IE IE IE IE IE HEH IE IE IE HE HEE FE HE HE IE IE IE IE HEE IE HE IE DE HE HE DE DE HE IE IE IE HE HEE DE IE HE HEHEHE HE IE EH HEH HE HHH HHH HHH KKH 


HEHEHE HEE HEHE IE HE IE HEHE HEE HIE HE IE HE IE IE HE HE IE HE DE HE DE IE DE HE IE HE DE HE FE HEE HE DE HK DE IE FE IE HE DE HE HE HE IE IE IE HE IE HE IE HEE HE IE HEE IE HEHE HE HHH 
* 


* 
bl Opcode dispatch table. One longword entry per opcode of the * 
* target (8088) processor, including illegals. > 
* * 


HEHE HEHEHE HEHE HEHE HEHE HE HE IE IE IE HE IE IE HE HE HE HE IE IE IE HE HEE HE IE IE IE IE DE DE HE HE HE HE DE HE HE HE HE HE DE HE HE DE HE IE IE DE HE DE HE DE HE DE IE HE DE IE EE IE HE EE EEE 


globl optabl, flags ,nop0s 
xdef mloop,illegl,service,preED, outspec 


diskio equ 8 ; Non-zero for special HDC/DMA support. 
return equ @16,r ; JMP (return) is fast return to MLOOP. 
pseudope equ @15,r ; 8080’s PC is register AS. 

opptr equ @14,r ; Pointer to opcode dispatch table. 
pseudosp equ @13,r ; 8880's SP is register A3. 

flagptr equ @12,r ; Pointer to 8088's flag lookup table is A2. 
targbase equ @11,r ; Pointer to 8080’s address space is A}. 
regs equ @11,r ; Base pointer to 8080's registers is A}. 
regcon’e equ 7,r ; Register based constant #$E (for speed). 
regcon®1 equ 6,r ; Register based constant #$1. 

regcon®f equ 5,r ; Register based constant /$F. 
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; Register based constant /SFF. 
Often used constants #0 & #8 are predominantly 
used by instructions that have '’quick’ modes 


regconff equ 4,r 
* 


* 


* ; which encompass these values -- no register 
* - needed (or available, either). 
regf equ 3,r ; 8880's Flags 
rega equ 2,r ; 8888's Accumulator 
regopS equ -9 ; Operand 3 for DAA storage. 
regb equ -8 ; Offsets from register base pointer for 
rege equ -7 ; 8280's pseudo-registers. 
regd equ -6 ; A & F are in Data Registers. 
rege equ -5 ; Pseudo-PC is kept in an Address Register. 
regh equ -4 
regl equ -3 
regop! equ -2 ; Operand 1 for DAA storage. 
regop2 equ -] : ” 2 ” ” " 
data 
page 
even 
optabl dc.l nop®0,lxib,staxb, inxb,inrb,dcrb,mvib,rica 
dc.1 nop88,dadb, ldaxb,dexb, inrc,derc,mvic,rrca 
dc.1 nop16,lxid,staxd,inxd,inrd,derd,mvid,ral 
dc.1 nop18,dadd, ldaxd,dexd,inre,dcre,mvie,rar 
dc.1 nop20,1xih,shld,inxh,inrh,dcrh,mvih,daa 
dc.1 nop28,dadh, lhld,dexh,inr1,dcrl,mvil,cma 
dc.1 nop38,lxis,sta,inxs,inrm,dcrm,mvim,stc 
dc.1 nop38,dads,lda,dexs,inra,dcra,mvia,cmc 
dc.1 movebb,movebc,movebd,movebe,movebh, movebl ,movebm, moveba 
dc.1 movecb,movecc,movecd,movece,movech,movecl ,movecm, moveca 
dc.1 movedb,movedc,movedd,movede, movedh, movedl ,movedm, moveda 
dc.1 moveeb,moveec,moveed,moveee, moveeh, moveel ,moveem,moveea 
dc.1 movehb,movehc,movehd,movehe, movehh, movehl ,movehm,moveha 
dc.l] movelb,movelc,moveld,movele,movelh,movell ,movelm,movela 
dc.1 movemb,movemc,movemd,moveme,movemh,movenl ,halt,movema 
dc.1 moveab,moveac,movead,moveae,moveah,moveal ,moveam,moveaa 
dc.1 addb,addc,addd,adde,addh,addl ,addm,addaa 
dc.1 adcb,adcc,adcd,adce,adch,adcl ,adcm,adca 
dc.1 subb,subc,subd,sube,subh,subl ,subm,subaa 
dc.1 sbbb,sbbc,sbbd,sbbe,sbbh,sbbl,sbbm,sbba 
dc.1 andb,andc,andd,ande,andh,andl,andm,anda 
dce.l xrab,xrac,xrad,xrae,xrah,xral,xram,xraa 
dc.1 orab,orac,orad,orae,orah,oral,oram,oraa 
dc.1 cmpb,cmpc,cmpd,cmpe,cmph,cmpl,cmpam, cmpaa 
de.l rnz,popb, jnz, jmpa,cnz,pushb,adi ,rst@ 
dc.1 rz,ret,jz,nopCB,cz,call,aci,rst8 
de.l rnc,popd, jnc,out,cnc,pushd,sui,rsti@ 
dc.l rc,nopD9, jc, in,cc,nopDD,sbi,rst18 
de.l rpo,poph, jpo,xthl ,cpo,pushh, ani ,rst2 
dc.1 rpe,pchl, jpe,xchg,cpe,preED,xri,rst28 
dc.1 rp,popp,jp,di,cp,pushp,oria,rst38 
dc.1 rm,sphl,jm,ei,cm,nopFD,cpi,rst38 
page 
EE HEHE HE IE IE IE IE IE IESE SE DE 9 96 96 96 9E 96 9G SESE 3 DE 9 EE 96 DE 9E EE 36 96 EE DE DE DEE 36 26 96 96 9 SE JE 2 DE IEE EE DEE 9E DE DE DE EE EEE OE DE DE EE EEE 
* * 
* Flag register lookup tables. #* 
* * 


HEE HE HE IE HE IE IE IE IEE DE HE IEE EE DEE 9E SEE DEE 9-34 96 E96 9 9 IE IE HE 9E HE DEE 9E EE IE DE IE DE FE DE FE DE 3E IE EE EE EE HE IE EE IE IEE IE EE EE EE 


flags dc.b $00,$01,$04,$05,$40,$41,$44 , $45, $80,$81,$84,$85,$C0,$C1 ,$C4,$C5 
dc.b $44,$00, $00 ,$04 , $00 , $04, $04 , $00 , $00 ,$04 , $04 , $20 , $04, $00, $00, $04 
dc.b $08,$04, $04 , $00, $04 , $00, $00 , $04 , $04 , $00, $00 , $04 , $00 $04 , $04, $00 
dc.b $20,$04 $24 , $00, $04 , $00 , $00, $04 , $04 , $00 , $00 , $04, $00 $04 , $04 , $00 
dc.b $04 ,$00, $00,504 , $00, $04 , $04 , $00 , $00 ,$04 ,$24 , $00, $04 , $00, $00, $24 
dc.b $00,$04, $04 , $00 , $04 , $00, $00 $04 , $04 , $00,300 , $04 , $00 $04 , $04 , $00 
dc.b $24 ,$08, $008 ,$04 , $00 , $04, $04 , $00, $00 $04 , $24 , $00, $04 , $00 ,$00,$04 
dc.b $84, $00, $00, $04 , $00 , $04 , $04 , $00 , $00 $04 , $24 , $08, $04 $00, $00,504 
dc.b $20,$04, $04 , $00, $04 , $00, $00 $04 , $04 $00,300 , $04 , $00, $04 , $04 , $00 
dc.b $88,$84, $84 ,$80,$84 ,$80 $80 ,$84 , $84, $80, $80 ,$84 ,$80,$84,$84,S$8A 
dc.b $84, $80, $80 ,$84 , $80, $84 ,$84 , $80, $80 , $84 ,$84,$80,$84 ,$80,$80 ,$84 
dce.b $84,$80,$80 ,$84 , $80 ,$84 ,$84 , $80, $80 ,$84 ,$84, $80, $84 , $80, $80 ,$84 
dc.b $88,$84 , $84, $80, $84 , $80 , $80, $84 ,$84 , $80, $80,584 , $80 ,$84 , $84, $80 
dc.b $84 ,$80,$80,$84, $80 ,$84 , $84, $80, $80,$84 , $84 , $80, $84 , $80, $80, $84 
dc.b $88,$84 ,$84,$80,$84 , $80, $80, $84, $84 ,$80,$80,$84 , $80 ,$84 ,$84,$80 
dc.b $80,$84 ,$84 , $80 ,$84 , $80 , $80, $84 , $84, $80, $80, $84, $80, $84, $84, $80 
dc.b $84,$80,$88,$84 , $80 ,$84 ,$84 ,$80,$80 ,$84,$84 , $80, $84, $80,580,584 
page 


HEHE IE IE HEHE HE IE HEHE IE HE HE HE DE SE IE FE HE HE HE EE 3 3E IE IE HE DE HE DE EE IE DE HE HE HE DE 96 DE DE DE DE-DE DE DE IE DE EE FE DE I IE HE EE ETE HEE EE HEE HHH 


Opcode simulation subroutines. 


Note: 1/0 instructions are based at 680208 address $FF2000 


as is appropriate for the CompuPro CPU-68K card. 


* KK K KK K OX 


* * K K KK KX X 


Also, all routines assume that the high word of Dé = B! 


HE HE IE HEE HE HE IE HE IE HE FE HE SE HEHE HE HE DE IE FE IE FEE HE HE DE IE HEHE FE IE IE HE IE DE DE DE HE HE DEDEDE DE HE HE HE IE DE HE IE HE DE HE HE DE HE FE IE HE DE HEE HE HE IE HEE EH 


text 
even 


nop6g jmp (return) ; 88 Nop 
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lxib 


staxb 


inxb 


inrbd 


derb 


mvib 


rica 
docyf 


rici 
nop£8 


dadb 


ldaxb 


move.b (pseudopc)+,regc(regs) 
move.b (pseudopc)+,regb(regs) 
jmp (return) 


01 Lxi BC,nnnn 


move.w regb(regs) ,dé 
move.b rega,O(targbase,d@.1) 
jmp (return) 


62 Stax B 


inc.w regb(regs) 
jmp (return) 


63 Inx B 


inc.b regb(regs) 

move sr,d0 

and.w regcon@e, dé 

and.w regcon®\,regf 

or.b O(flagptr,dd.w) ,regf 
jmp (return) 


64 Inr B 


dec.b regb(regs) 

move sr,d@ 

and.w regcon#e, dé 

and.w regcon01 ,regf 

or.b O(flagptr,d@.w) ,regf 
jmp (return) 


05 Der B 


move.b (pseudopc)+,regb(regs) 
jmp (return) 


66 Mvi b,nn 


rol.b #1,rega 67 Ric 
bes rlcl 

belr #0,regf 

jmp (return) 

bset #0,regf 


jmp (return) 


bra illegl ; 88 Illegal for 8288 
move.w regb(regs) ,d@ ; 89 Dad B 

add.w d@,regh(regs) 

bra docyf 

move.w regb(regs) ,d@ ; BA Ldax B 


move.b 8(targbase,d#.1),rega 
jmp (return) 


CP/TREE 


Tree-Structured Named Directories for CP/M 2.2 


¢ Transforms user areas into Unix-like directories 
* Provides Unix-like directory commands: 


CD, MKDIR, PWD, RMDIR, TREE 


* Includes a CCP replacement featuring: 


¢ Command and file search path. Use programs like 
WordStar from any directory! 

¢ Erase with query 

* Wildcard rename with query 


¢ Provides output redirection to disk file 

° Uses as little as Y2k RAM, never more than 2%k 

¢ A must for hard disks 

* Installs easily: requires no modifications to BDOS or BIOS 
* Requires standard CP/M 2.2 (not 3.0 or Apple), Z80, 


48k RAM 


$29.95 plus $4.00 s&h 


To order: Specify disk format (8” SSSD, NorthStar DD. Call for 
info on others.). MC, Visa, COD (add $1.90), check (delays 
shipping 2 weeks). MA residents add 5% sales tax. POs not accepted. 


Precise Electronics 
P.O. Box 339 

New Town Branch 
Boston, MA 02258 
tel: (617) 332-3977 


Apple® Apple Computer. CP/M® Digital Research. WordStar™ 
MicroPro International. Z80® Zilog. Unix® AT&T Technologies. 
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dcxb 


inre 


derc 


mvic 


rrea 


nop1 


lxid 


inxd 


dec.w regb(regs) ; 8B Dex B 
jmp (return) 


inc.b regc(regs) 

move sr,dQ 

and.w regconBe, dd 

and.w regcond!,regf 

or.b O(flagptr,dé.w) ,regf 
jmp (return) 


6C Inr C 


dec.b regc(regs) 

move sr,d0 

and.w regconde, dé 

and.w regcon®\,regf 

or.b 8(flagptr,dd.w),regf 
jmp (return) 


QD Der C 


move.b (pseudopc)+,regc(regs) 
jmp (return) 


BE Mvi C 


ror.b #1,rega OF Rre 


bra docyf 


6 obra illegl 16 Illegal for 8882 


move.b (pseudopc)+,rege(regs) 
move.b (pseudopc)+,regd(regs) 
jmp (return) 


11 Lxi DE,nnnn 


staxd move.w regd(regs) ,d@ ; 12 Stax D 
move.b rega,@(targbase,d8.1) 
jmp (return) 
inc.w regd(regs) ; 13 Inx D 


jmp (return) 


(Continued on next page ) 
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The Bible of the 
Serious User TheABC’s of Languages 
ADA-Basic-C 


Subscribe NOW and Receive FREE Reprints Previous (1-8) 
Continuous ADA Series offer exp. 2-15-86 


Hardware-Software-Application Articles 
New Product Releases-Announcements 
Hints-Kinks-Fixes, etc. 

Subscription Rates 
U.S.A: 1 Yr. $24.50, 2 Yrs. $42.50, 3 Yrs. $64.50 
*Foreign Surface: Add $12.00 per Year to USA Price 


*Foreign Airmail: Add $48.00 per Year to USA Price 
*Canada & Mexico: Add $9.50 per Year to USA Price 


* U.S. Currency or Check or Draft Drawn on USA Bank !! 


@= (615) 842-6809 


Telex 5106006630 





5900 Cassandra Smith Rd. Hixson Tn. 37343 


Circle no. 243 on reader service card. 


111 





8080 SIMULATOR 


LISTING TWO (Listing Continued, text begins on page 76) 


inrd inc.b regd(regs) ; 14 Inr D move.b (pseudopc)+,regh(regs) 
move sr,d0 jmp (return) 
and.w regconfe, dB 
and.w regconO\ ,regf shld move.b 1(pseudopc) , dé ; 22 Shld addr 
or.b O(flagptr,d@.w),regf rol.w #8,d6 
jmp (return) move.b (pseudopc) ,d@ 
addq.1 #2,pseudopc 
derd dec.b regd(regs) : 15 Der, D move.1 d0,a0 
move sr,d@ adda.1 targbase,a® 
and.w regcon#e,d0 move.b regl(regs) , (a0)+ 
and.w regcon®1,regf move.b regh(regs), (a8) 
or.b 8(flagptr ,d@.w),regf jmp (return) 
jmp (return) 
inxh inc.w regh(regs) ; 23> Inx H 
mvid move.b (pseudopc)+,regd(regs) ; 16 Mvi D,nn jmp (return) 
jmp (return) 
inrh inc.b regh(regs) ; 24 Inr H 
ral roxr.b #1,regf - 17 Ral move sr,d@ 
roxl.b #1,rega and.w regconBe, d@ 
roxl.b #1,regf and.w regcon®\,regf 
jmp (return) or.b O(flagptr,d@.w) ,regf 
jmp (return) 
nopi8 bra illegl ; 18 Illegal for 8888 
dcrh dec.b regh(regs) 3 ea.Der. H 
dadd move.w regd(regs) ,d@ ; 19 Dad D move sr,d@ 
add.w d@,regh(regs) and.w regcone, dO 
bra docyf and.w regcon01,regf 
or.b O(flagptr,d@.w),regf 
ldaxd move.w regd(regs) ,d@ ; 1A Ldax D jmp (return) 
move.b O(targbase,d@.1),rega 
jmp (return) mvih move.b (pseudopc)+,regh(regs) - 26 Mvi H,nn 
jmp (return) 
dcxd dec.w regd(regs) ; 1B Dex D 
jmp (return) daa move.b regop3(regs) ,d@ ; 27 Daa 
roxr.b dé 
inre inc.b rege(regs) ; 1C Inr E move.b regop2(regs) ,d@ 
move sr,dQ move.b regop1(regs) ,dl 
and.w regcone,d0 swap regconfe 
and.w regcon0\ ,regf move.b rega,regconfe 
or.b 6(flagptr ,d8.w) ,regf and.b regcon@f ,regconée 
jmp (return) cmp.b #9,regconfe 
bhi halfcy 
dere dec.b rege(regs) ; 1D Der E and.b regcondf, dé 
move sr,d@ and.b regcondf,d1 
and.w regcone,d@ ori.b #$f0,d1 
and.w regcon#1,regf addx.b dd,d1 
or.b O(flagptr,dd.w),regf bee nohalf 
jmp (return) halfcy add.b #6,rega 
bes fullcy 
mvie move.b (pseudopc)+,rege(regs) ; 1E Mvi E,nn nohalf btst #0,regf 
jmp (return) bnz fullcy 
move.b rega,regconfe 
rar roxr.b #1,regf ; 1F Rar and.b 4$f@,regconBe 
roxr.b #1,rega cmp.b #$98,regconBe 
roxl.b #1,regf bls nofull 
jmp (return) 
nop28 ~—bra illegl ; 26 Illegal for 8688 
lxih  move.b (pseudopc)+,regl (regs) ; 21 Lxi H,nnnn (Listings to be Continued next month) 


Excellent product... best 
screen manager I’ve ever 
seen in any language. 


Don A. Williams 
Finance & Administration 
Honeywell 


The word professional 
most certainly describes 
the capabilities this sub- 
routine library provides 
for implementing inter- 
rupt service and pop-up 


TURBO PROFESSIONAL’s easy to use routines let you... 
write safe, ‘‘sidekickable’’ routines that can use DOS 

* execute DOS commands from Turbo * create super-fast 
windowed displays * service interrupts without assembler 
¢ make your own keyboard enhancers ¢ allocate memory 


from DOS ¢ print concurrently with DOS 3.x. 


Complete with 109 + routines, manual, source code to 
Super Macs keyboard enhancer, and many example 

programs. 
Only $49.95 + $5.00 shipping & handling 
Visa, MasterCard ok. 


_ Sunny Hill Software 
\ ) 13732 Midvale North Suite 206 
Seattle, Washington 98133 


Requires Turbo for compatibles. Turbo Pascal & Sidekick Trademark Borland Intl. 


Order now! 
(206) 367-0650 


routines. 
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Fatten Your 
Mac 
for $5.00 


Thanks to Macintosh owners everywhere, Dr. Dobb’s 
January 1985 issue #99 was a runaway best-seller. 








Now, due to popular demand, the Doctor has reprinted the 
sought-after Fatten Your Mac article from the sold-out 
January issue. The article explains how you can pack a full 
512K of memory into your system, and save half the cost by 
performing the upgrade yourself. 


To order: Enclose $5.00 for each copy with this coupon and 
send to: 


Dr. Dobb’s Journal, 2464 Embarcadero Way, Palo Alto, CA 
94303 
Outside U.S., add $2.00 per copy for shipping & handling. 


Please send me copies of Fatten Your Mac. ALL 
REPRINT ORDERS MUST BE PREPAID. 


Name 





Address 





City 1 | ee | | 9 ee aa 





Please allow 6-9 weeks for delivery. 
Offer expires Dec. 31, 1985 311G 


Creer — — 








U S Software 





Multi-Tasking Operating 
System Executive 


e Real-time and ROMable e Intertask communication 

e Dynamic task management ¢ Sample debug system included 
e Priority task scheduling e User defined configurations 

¢ Memory management e Less than 3K bytes 


e Delivered in source assembly for ease of configuring and 
customizing functions for specific job applications 













USX product line also supports the 
8086/8088, 8051 and 8096 microprocessor families. 











United States Software Corporation 
5470 N.W. Innisbrook Place @ Portland, Oregon 97229 e (503) 645-5043 
International Telex 4993875 (U S Software) 
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16-BIT 


LISTING ONE (Text begins on page 118) 


ADDRESS OF THE PROGRAM'S PSP. GET IT BY 
SUBTRACTING 10 PARAGRAPHS FROM THE SEGMENT 


OF THE PROGRAM'S ENTRY POINT, WHICH HAS THE 
DUMMY SEGMENT TO BE GROUPED WITH HIMEM, WHICH 


Se Se Se Se Se 


; LABEL ‘MAIN’. 

; IS AN EMPTY SEGMENT AT THE END OF THE USER'S 

; PROGRAM MOV AX,SEG MAIN ; GET ENTRY SEGMENT 
r SUB AX,10H ; ADJUST TO GET PSP 
HIMEM GROUP HIDATA J MOV ES,AX ; PUT VALUE INTO ES 
HIDATA SEGMENT COMMON ‘HIMEM' MOV BX,-1D ; GET ALL OF MEMORY 
FLARB DW 0 MOV AX, 4A00H 7 DOS FUNCTION CODE 
HIDATA ENDS Int. 218 2.00, 27 


THE NUMBER OF AVAILABLE PARAGRAPHS IS IN BX, 
‘MAIN' IS THE PROGRAM'S ENTRY POINT, 


Se Se Se Ve 


, RETURN IT TO USER. 

; JUST ABOVE THE PSP 

7 LES DI,14[BP] ; STORE IT. IN 
EXTRN MAIN: FAR MOV ES: [DI] ,BX ; USER'S VARIABLE 


ARCODE SEGMENT PUBLIC *CODE' 
, TRY TO ALLOCATE THE PARAGRAPHS REQUESTED. 


ASSUME CS:ARCODE A VALUE OF -1 MEANS DON'T ALLOCATE ANY. 


- PUBLIC FREMEM 


Se Se Se Se Ne 


LES DI,10[BP] ; GET THE USER'S 


FREMEM PROC FAR MOV BX, ES: [DI] 


MOV. ES: [BX] ,AX ERR: LES BX, 6[BP] STORE ERROR CODE 


; VARIABLE 
; CMP BX,-1D 7 SHOULD WE ALLOCATE? 
PUSH BP ; STANDARD ENTRY STUFF JE OK ; NO, BAIL OUT 
MOV BP,SP , MOV AX,SEG MAIN ; GET ENTRY POINT 
; SUB AX,10H ; ADJUST TO GET PSP 
; GET THE ADDRESS OF HIMEM, THE TOP OF THE MOV ES, AX > PUL IT IN ES 
; USER'S PROGRAM, STICK IT IN USER'S VARIABLE MOV AX, 4A00H ; DOS FUNCTION CODE 
; INT 21H yO. FT 
MOV AX,SEG HIDATA ; GET TOP SEGMENT JNA ERR ; CHECK FOR ERRORS 
LES BX,18[BP] ; SEND IT TO THE USER OK: XOR AX,AX ; NONE, CLEAR FLAG 


MOV ES: [BX] ,AX IN USER'S VARIABLE 





; FIND OUT HOW MUCH MEMORY IS AVAILABLE ABOVE ; THAT'S IT 
; HIMEM BY REQUESTING A LOT OF MEMORY. ; 
; THE CALL TO FUNCTION 4AH NEEDS THE SEGMENT MOV SP,BP ; STANDARD EXIT STUFF 
POP BP 
RET 16 
FREMEM ENDP 
ARCODE ENDS 


Now aevailebvle for the ai End Listing One 
computer experimenter! 


COMPUTER CONNOISSEUR?’S DELIGHT! 


NOW BE IN CONTROL WITH YOUR COMPUTER — THE ONLY PUBLICATION 
OF ITS KIND WRITTEN FOR THE USER. DISCOVER THE SECRETS AND LISTING TWO 
LEARN THE VERSATILITY OF MODERN COMPUTER COMMAND CONTROL 
CONCEPTS. EXPERIMENT WITH COMPUTER AND TELEPHONE SYSTEMS, 
INTERFACE THEM, LEARN HOW THEY WORK, WHAT THEY DO... AND 
HOW TO GET THEM TO WORK FOR YOU! A COMPLETE TELEPHONE 


; Michael Barr's 32-bit Square Root Routine 
ENGINEERING COURSE IS INCLUDED IN MONTHLY CHAPTERS, BRING- f Call with CX:BX 


= argument 
ING YOU THROUGH STEP, CROSSBAR, ESS, BUBBLE, AND ATOMIC a 
SWITCHING SYSTEMS! EXCLUSIVE COVERAGE IN BIOLOGICAL COMPUT- Returns BX result 
ING SYSTEMS, TOO! COMPUTERS AND TELEPHONES ARE THE FUTURE. 
THIS PUBLICATION IS AN ABSOLUTE MUST FOR EVERYONE INTERESTED. ee 
Se een ee ee ee ee ny moa sqrt proc near sCXs = argument 
UNPUBLISHED , : 
ush ax ;save other registers 
MATERIAL The one youve. all ee aye 9 
been waiting for> Pees oes 
VAILABLE — L h ir tele- 5 ; 
Sern ahaa phere Seine howe won ip _— dx, CX ;prepare first try 
monthly installments with the mov di,-i 
comics S magazine for you. sqrtl: shl dx,1 ;estimating size of arg. 
w jc sqrt2 sto guess initial try 
shl ax, 
DIRECTORY : ; 5 
sco < Comiputel es 
NET- shr di, 
WORKS jmp sqrtl 
PUBLISHED MONTHLY sqrt2: mov dx, CX 7;restore argument 
mov ax, bx 
ONE YEAR SUBSCRIPTION $14.00 cmp re ;prevent overflow 
(SAMPLE COPY $2.00) aa aa 
SUBSCRIPTION & 2 PROGRAMS $20.00 tag a a ‘der chbiche “ana diese 
jae sart4 
COMPUTEL—the complete SOURCE for everyone. add di,ax ;average them 
You can now do the things you've only heard about, rer di,1 | } 
nig in the privacy of your own home. Indispensable jmp sqrt2 zand do it again 
reference to phreaks and hackers. Learn how to get sqrt3: = Mov es ;prepare first try 
all kinds of computer programs FREE. Get the inside a: apes Pv pil 
story of big businesssystems—their quirks and flaws ant Seer Sas ee . 
—and remain up to date with vitaloccurrences within oe ai. bee tan 
the computer industry. Computel isa publication de- sqrt4: MOV bx, di sreturn result in BX 
signed for everyone who has an intense curiosity of pop di 
computer systems, containing a wealth of hard to find pop dx 
information, codes, and numbers. Published monthly. pop ax 
SS re 
Computel Publishing Society sqrt endp ! 
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Arity /Prolog 
Arity /Prolog 
interpreter 
Standard Prolog 


Arity 


rity 's integrated family of programming 
tools allows you to combine software 
written in Arity/Prolog." the best of the 
fifth generation languages, with Arity SQL, the 
best of the fourth generation languages, and 
with conventional third generation languages 
such as C or assembly language to build your 
smarter application. 





You can use Arity/Prolog to build expert systems 
using the Arity Expert System Development 
Package. Or to build natural language frontends. 
Or to build intelligent information management 
systems. Arity/Prolog lets you build advanced 
technology into your vertical applications 
package. 


And more ... 


That's not the whole story. Arity’s products are 
all designed to be fast, powerful, serious. Each 
of our products contains unexpected bonuses. 
Such as a one gigabyte virtual database inte- 
grated into Arity/Prolog. The most powerful of 
its kind on a PC. 


Quality First. Then Price. 


In order to be the best, we had to prove it to 
Our Customers. Our tradition of quality software 
design is reflected in every product we sell. 
Quality first. Then price. And we always pro- 
vide the best in customer support. 


Our products are not copy protected. We do 
not charge royalties. And we offer generous 
educational and quantity discounts on every one 
of our products. 


—— arity 


Arity SOL Uj 
Development Package j 


iw 


Arity Expert Systems 
Development Package 


Why your next generation of products 
should use our 5th generation tools. 





If we are new to you, we do not ask that you 
trust us. You have to try us to know that we 
keep our promise on commitment to quality and 
reliability. Try us by using our electronic 
bulletin board at 617-369-5622 or call us by 
telephone — you can reach us at 617-371-2422. 


Or fill in this coupon. Whether you order today 
or not, let us send you full descriptions of our 
integrated family of Arity products. 











Please complete this form to place your order and/or request 
detailed information 


ame Soom Re et 
Srhippan Anidresg 28 ka Ns ae 


ROP 55h Zip 


Teleplyone 6. fp os: 


Quantity Info Only 


Arity/Prolog Compiler and Interpreter V4 
$795.00 
Arity/Prolog Interpreter 
$350.00 


Arity Standard Prolog 
$ 95.00 
Arity SQL Development Package 
$295.00 ie 
Arity Expert System Development Package 
$295.00 
Arity Screen Design Toolkit 
> 49°95 
Arity File Interchange Toolkit 
$ 49.95 =e, 
Total Amount 
(MA residents add 3% sales tax) > 
(These prices include shipping to all U.S. cities) 


Check PO AMEX VISA MC. 


Expiration Date 


Payment: 
Card No. 
Signature 


arity 
Arity Corporation 


358 Baker Avenue Concord,MA01742 ™° 
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COLUMNS 


QO ne of the more ominous devel- 
opments in the last few months 
is the appearance of so-called Trojan 
horse programs on some public bul- 
letin board systems. These have ap- 
peared under such names as EGABTR, 
VDIR, and SYSUTIL. They are usually 
accompanied by scanty documenta- 
tion that bills them as super disk di- 
rectories or something similar, but 
their actual effect is to trash your sys- 
tem by formatting the hard disk, 
erasing the file allocation table, or 
writing random garbage into files. I 
put the people who create and 
upload such programs to public BBSs 
in the same category as terrorists. 

Along similar lines, some villains 
have taken advantage of their knowl- 
edge of the public-domain PC remote 
BBS to upload programs that purport 
to paint a pretty picture on the screen 
or do something else cute but actually 
copy the password file or other vital 
system files to (unprotected) files un- 
der another name. The villain calls 
back later and downloads the unpro- 
tected files, thereby gaining access to 
privileged files and messages. 

As the computer terrorists become 
more clever, we can expect the ap- 
pearance of subtle sabotage pro- 
grams that copy themselves to hid- 
den files on the hard disk or attach 
themselves to the bootable operating 
system and don’t do their damage 
until much later. For example, I can 
envision a hard disk destruction pro- 
gram that would wait until it saw 
that you had not run Backup for a 
week! The nature of the damage 
could also be so subtle that it would 
drive you crazy, such as simply 
changing a bit in a random sector of 


by Ray Duncan 


The programs published in this 
month’s column are available for 
downloading from the Laboratory Mi- 
crosystems RBBS at (213) 306-3530 (300 
baud or 1,200 bps). 
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the hard disk every few days. 

These developments have the po- 
tential to damage or destroy the pro- 
liferation of public-domain software 
on bulletin boards, which would be 
very sad. BBS operators will not want 
to take the risk of being held liable for 
disasters due to Trojan horse pro- 
grams. On the LMI RBBS, we are im- 
mediately adopting a policy of delet- 
ing all programs that are not 
uploaded in the form of, or at least 
accompanied by, source code as a 
clear-text ASCII file. I’d like to hear 
comments from readers on this sub- 
ject, especially those who have been 
victims or who can provide actual 
samples of these Trojan horse pro- 
grams. 


EXEC Calls and FORTRAN 
Robert Sypek of a firm called Argis in 
Hudson, Massachusetts, writes: 
“While attempting to write a pro- 
gram that would execute a user or 
system task from a user program, | 
ran into many of the problems de- 
scribed in past issues about using the 
DOS 2.x EXEC function call. My prob- 
lems were compounded by the fact 
that Microsoft's languages (FORTRAN, 
Pascal, C) set up their own data and 
stack segments, and the code segment 
is that of the user program or subrou- 
tine, not the segment of the root pro- 
gram. This means that the program 
segment prefix (PSP) is inaccessible 
from any routine called by a user pro- 
gram. All is not lost, however, as I be- 
lieve I have found a method of re- 
trieving the necessary information to 
allow an EXEC function to be called. 
“The method depends on two 
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pieces of information that may be 
gleaned from the Microsoft user 
manuals: the compiler defines a null 
segment called HIMEM that is placed 
at the end of all other segments 
when the user program is loaded, 
and the compiler defines a symbol 
called MAIN that is located directly 
after the PSP. Both the segment and 
the symbol have the PUBLIC attribute, 
making them accessible to the user. 
“The segment of the PSP may be 
found by subtracting 10H from the 
segment of MAIN, yielding the value 
of the ES register needed for the call 
to EXEC. The value of HIMEM can then 
be used to calculate the size of the 
user program and the segment of the 
next available paragraph of memo- 
ry. 
Mr. Sypek enclosed an assembly- 
language subroutine that we are 
printing as Listing One (page 116). 
The routine is invoked in the form: 


re: 


CALL FREMEM(MEMPTR,MEMAVL, 
MEMALL,ERR) 


where MEMPTR is the segment value 
of the next available paragraph, ME- 
MAVL is the number of paragraphs 
available, and MEMALL is a user-de- 
fined variable specifying the amount 
of memory above the program to 
leave allocated to the user. (A value of 
—1 leaves all memory allocated to the 
program.) An error code of 0 indicates 
that the function was successful. 


Lightweight Reading 

Those who think the mainframe 
mentality is gone forever should 
read Martin Healy’s article ‘““Toward 
a Viable OS for the PC” (Datamation, 
September 1985). At first I took this 
article for a practical joke because it 
contains so many distortions of the 
history and current state of the art in 
microcomputers, sideways slams at a 
variety of targets, and outrageous 
gobbledygook (example: “PC Net- 
work could be the answer, but it 
won't share data, only the file’). 
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The author asserts that ‘‘there are 
in fact two leading real operating 
systems for micros, Unix and Con- 
current DOS from Digital Research.” 
He goes on to say, ‘“The new Version 
4.1 [of Concurrent DOs] is the ideal- 
ized multitasking PC DOS, which due 
to its maturity should eliminate any 
Microsoft version (PC DOS 4.0?) there- 
of. That leaves Microsoft to concen- 
trate on its Unix-like system, Xenix.”’ I 
am sure the folks at Microsoft will be 
very relieved to learn from Mr. Hea- 
ly that they no longer have to waste 
all that effort on maintaining MS DOS, 
can take MS DOS 4.0 out of testing and 
toss it in the trash can, and turn their 
attention to other matters. 


Square Roots 

Michael Barr of the Department of 
Mathematics at McGill University 
sent us his 8086 assembly-language 
subroutine for square roots (Listing 
Two, page 116). He writes: ‘This rou- 
tine gives the correct floored square 
root for any 32-bit number (consid- 
ered as unsigned). It is also faster 
than the bit-at-a-time algorithms you 
have put into DDJ. 

“Apropos that last statement, there 
seems to be a discussion between 
people who believe that Newton's 
method is always the best way to do 
a square root and others who believe 
equally fervently that the bit-at-a- 
time method is always faster. Com- 
mon sense would dictate that they 
are both wrong. I strongly suspect 
that Newton’s method is faster if and 
only if you have an on-chip (or co- 
processor) division of the relevant 
size. In particular, to do a 32-bit 
square root, you need a 32-bit by 16- 
bit division. This much I have tested; 
Newton's method is just about twice 
as fast (about 330 msec, compared to 
about 650 msec for the bit-at-a-time). 
What I haven't tested (I can’t face the 
thought of programming them) are 
64-bit square roots. But there is every 
reason to believe that it will be faster 
to do the bit-at-a-time square root 
than to code division and then use 
that for Newton's method.”’ 


Big DOS 

The new wave of PCs, based on the 
80286 microprocessor, are still limited 
to 1 megabyte of direct memory ad- 
dressing because they run MS DOS or 
its clones in 8086 emulation mode 
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(called Real Mode by Intel). The ability 
of the 80286 to address 16 megabytes 
of RAM in “Protected Virtual Memory 
Mode’ is currently supported only by 
the 80286 Xenix and iRMX-286 operat- 
ing systems, neither of which is likely 
to become very popular due to their 
incompatibility with WordStar, 
dBASE III, and Lotus 1-2-3. The aver- 
age user’s exploitation of the full ca- 
pabilities of the PC/AT and other such 
machines awaits the arrival of an op- 
erating system that runs in Protected 
Mode and can execute the popular 


MS DOS applications unaltered. 

Such an operating system has been 
the subject of much industry rumor 
and speculation. Digital Research has 
been talking about “Concurrent DOS- 
286" for some time now, even an- 
nouncing the operating system’s 
“immediate availability” at a press 
conference in New York about six 
months ago. (See ‘“‘Concurrent DOS- 
286: Available Now,” Intel Speak Soft- 
ly Quarterly, vol. 2, no. 2, Second 
Quarter 1985.) But lately DRI has been 
backpedaling a bit and now admits 








that we allow—code, data and stack. 


says is possible on the 8088/8086 chips. 
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short cut called incremental compilation. Compared to earlier Pascals, the effective 
speed is astronomical. Give the Compile command for a 1000 line program, and you 
probably can’t lift your finger from the keyboard before the compiler flashes—DONE! 


640K of storage not 64K. Are you fed up with being forced to shoehorn your pro- 
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Interactive Pascal. You can enter Pascal statements directly and see the results 
instantly. It works like a Basic interpreter but it’s a true compiler! 


Optimized 8086 Code. Mystic Pascal produces true 8086 object code. The TWO 
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another breakthrough, our software floating point arithmetic runs faster than Intel 
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cal programs by simply starting Pascal procedures. Up to 100 concurrent procedures 
can communicate by passing messages through queues. 
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Requires an IBM Personal Computer or true 
compatible with 256K. Not copy protected. 


Rush me the complete Mystic Pascal System with diskette and manual! 


|: ee CMe | 


Outside US & Canada add $15. Payment must be in US funds on a US bank. 































L_] Mastercard L] cob 










Exp. 





Circle no. 79 on reader service card. 


119 


\. Oo CO 
Ne} COM | Wie o> 
it? ont ve 
dea UN (08 
ev "9 oO re > ott 
or wo Oo got WN 


S e OME NE ce 
ono? ar? ade Qe 


e co 
rd OP 


ee CH 
N \ 
jee 


oo"; 

py yo NE: 

© on por ' 

os" 58 — 
\O 20 xe ; 


Se 
ok Go se on v 


oO 3. 
fe) oO n 
Ginene re? nek? 
yer x we gare 
oe" oe 
xO 
\S 
JOM sO 
Sone 











Vol Se aS = 
YES! L_] Please send me the following Volumes of Dr. Dobb’s Journal. Vol. 2 x $27.75 = 
Payment must accompany your order. oohe : eas: a 
Please charge my: LJ} Visa [J MasterCard [] American Express Vol 5 x $97.75 a 
lenclose [J] Check /money order Vol. 6 x $27.75 = 
ard # Expiration Date _. Vol. 7 x $30.75 = 
. e Voel8 oe B46 
Signature AG: .8) ee Se = 
PSR pe he IR hd Cras eS it Se Thay Pei“ Sub-total $ 
(please, no P.O. Boxes) California residents add applicable 
one aS ap Post & H ae an tb i luded with ord 
: ; ostage andling Must be Included with order. 
Mail to Dr. Dobb’s Journal, 2464 Embarcadero Way, Palo Alto, CA 94303 Please add $2.25 per book in US. ($5.25 each surface 
setae Allow 3-6 weeks for delivery. mail outside U.S. Foreign Airmail rates available on 
request. ) 


TOTAL $ 











16-BIT 
(Continued from page 119) 


that 80286 Concurrent DOS will prob- 
ably never exist in the form original- 
ly advertised. Of course, the compa- 
ny is blaming its problems on 
“defects” in the 80286 design. (When 
in doubt, fall back on the classic pro- 
grammer's defense: ‘It must be a 
hardware problem. ’’) 

Microsoft Corp. is also known to be 
working on a Protected Mode, up- 
ward-compatible version of PC DOS 
(already dubbed Big DOS by the trade 
rags and assumed to be Version 5.0). 
But Microsoft has been very close- 
mouthed about these efforts, pre- 
sumably wanting to make sure it can 
pull it off before committing itself to 
such a product in public. Too bad DRI 
wasn t that careful! 

Ross Nelson, who_ previously 
worked on the 80286 team at Intel, 
took the time to write to us with 
some musings on the future of DOS 
and Protected Mode. He says, ‘With 
regard to the 286 in the marketplace, 
it seems to me that unless a compara- 
tively low-cost system (PC/II?) is in- 
' troduced, there won't be a lot of 
work done that will take advantage 
of Protected Mode (PM). The installed 
base of AT users vs. the number of 
PC-compatible users will make it eco- 
nomically unfeasible. Once people 
do start working with PM, they will 
encounter some interesting prob- 
lems. The great virtue of PM is that 


no task in the system should be able | 


to corrupt another task (assuming the 
operating system is stable). As a soft- 
ware engineer, I applaud this philos- 
ophy, and I believe that this use of 
the 286 should be encouraged. Realis- 
tically, however, it is clear that there 
will be a transition period in which 
PM will only be used to gain access to 
the larger memory space. 

Nelson wrote: ‘‘As far as I can tell, 
there are only two ways of switching 


back to Real Mode when you are in | 


Protected Mode, and only one of them 
is feasible with the standard 80286 
part. This is essentially the method 
IBM has chosen [in the VDISK driver 
supplied with PC DOS 3.x... RDI, 
which is to place enough state infor- 
mation to restart your process in a 
‘safe’ location and RESET the proces- 


sor. The other method requires a spe- | 
cial ‘bond-out’ part (which Intel uses in | 
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its 12-ICE). By activating a special pin 
on the bond-out chip, you can issue 
special instructions that dump and re- 
store the internal state of the machine, 
including the Machine Status Word. 
Systems built with the bond-out chip 
could easily be toggled between Real 
Mode and Protected Mode. 

“Whether or notta DOS 5.0 or Big 
DOS can be successful in emulating 
the current PC system architecture 
on a 286 will depend on how freely 
the implementors translate the word 
compatible. | do not believe that 100 





percent compatibility can be accom- 
plished without unreasonable over- 
head. I suspect that even partial com- 
patibility will have large memory 
requirements. It would not surprise 
me to see a 512K operating system 
with an additional 32K required on a 
per-task basis. Here is how I believe 
some of the problems that come up 
can be handled: 

“Video—This has quite a few sim- 
ple solutions: (a) trap each initial write 
to the display segment, and replace 
the offending segment register with 
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¢ Fast editing through syntax oriented cursor movements. 

¢ Dramatically reduced debugging time through immediate syntax checking. 
e Fast development through unique programmer oriented features. 


e Automatic program formatter. 
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FirsTime Has 
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FirsTime Works With Existing Files. 


FirsTime works with standard ASCIl files, so you 
can edit any existing source files. 


FirsTime for Turbo Pascal $ 74.95 
FirsTime for dBase III $125.00 
FirsTime for MS-Pascal $245.00 
FirsTime for C $295.00 


Requires MS DOS, 256k (384 recommended) 
& 5.25” drive 


In Germany, Austria and Switzerland contact: 
Markt & Technik Software Verlag 

Munchen, W. Germany 

(089) 4613-0 


Circle no. 164 on reader service card. 


121 


Who Says You 
Can’t Tell 
A Book By 
Its Cover? 
















Dr. Dobb’s Sourcebook: 
A Reference Guide 


or the C Programming 
Language 





To order by credit card, call toll free: 1-800-528-6050 ext.4001 . Ask for item 004 or 


mail this coupon, along with payment to Dr. Dobb’s Journal, 2464 Embarcadero Way, Palo Alto, CA 94303 






































PAYMENT MUST ACCOMPANY YOUR ORDER Please send me copies of Dr. Dobb’s Sourcebook 
I enclose check /money order 

_____ Please charge my __VISA __M/C __ American Express at SF. 95 emeli Sn 
Card # Exp. Date 
Ctr canine + Shipping & Handling = 

(Must be included with order. Please add $1.50 per book in 
Name U.S. $3.25 each surface mail outside U.S. Foreign airmail 
Address rates available on request. ) 
City State Zip 


TOTAL = 


Please allow 6 to 12 weeks for delivery 
3111D 


122 





16-BIT 
(Continued from page 121) 





an OS-created descriptor; (b) use the 
TopView solution, that is, require ap- 
plications to issue a software inter- 
rupt to get the address of their own 
‘local’ display buffer; (c) trap every 
display write and deal with it on a 
case-by-case basis. Solution (c) is the 
most compatible but the poorest per- 
former; (a) is almost as compatible and 
would substantially increase perfor- 
mance. Solution (b) is the best and 
would not cause a great deal of in- 
compatibility, especially with pro- 
grams that use installable device 
drivers. 

“Communications—Here we have 
no simple solutions. I would expect 
that all but the most primitive com- 
munications applications would 
have to be rewritten. Anything more 
complicated than Int 14H calls should 
be declared incompatible and re- 
written to fit the new OS. 

“EXE files—Here, the OS must limit 
the ‘free-memory’ size to 64K of code 
and 64K of data. Programs that need 
more memory should be forced to 
[dynamically] allocate it. Because of 
the large number of programs that 
indiscriminately load segment regis- 
ters, however, an OS might want to 
trap segment load faults and attempt 
to map them into the 8086-style phys- 
ical addressing scheme. 

“COM files—These programs are 
the most likely to be incompatible, 
because they often load and stay resi- 
dent and have only one segment (CS). 
Because executable segments are 
never writable, an OS would incur 
severe performance penalties trying 
to simulate the standard DOS mode of 
operation here. Some heuristics 
would work for some programs, 
such as loading DS, SS, and ES with a 
writable alias of the CS descriptor, 
but any program that did segment 
register arithmetic would then yield 
incorrect results. 

“Obviously, there are hundreds of 
similar problems. . . . The question is, 
what solutions will the marketplace 
accept? It seems that a Protected 
Mode 286 operating system will have 
to contain a large measure of DOS/ 
IBM PC compatibility to prevent the 
‘software gap’ problem faced by the 
Macintosh, Amiga, etc. Unfortunate- 
ly, this means a lower-performance, 
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aesthetically unpleasing solution. I 
would welcome a radically differ- 
ent, optimized system, but only IBM 
has the clout to pull it off, and there 
would still be two important factors: 
IBM would have to want to do it, and 
it would have to do it right.” 


Nothing but the Best for My 
Little Girl 

Richard Gaulden, vice president of 
sales and marketing for EDCOM, Inc., 
wrote me a letter describing his com- 
pany as a “national supplier of en- 
richment materials to school and li- 
brary systems.’’ His sales pitch 


wound up with the statements: ‘“ED- 
COM can free your distribution chan- 
nels by marketing software that be- 
comes outdated by new releases. The 
educational market does not have 
the need for constant upgrades, espe- 
cially when new versions are more 
costly.” Kind of gives you a warm, se- 
cure feeling about your kids’ educa- 
tion in computer literacy, doesn’t it? 


DDJ 
(Listing begins on page 116) 
Reader Ballot 


Vote for your favorite feature/article. 
Circle Reader Service No. 6. 













the finest C libra 





» already complete .. . alreaa 














The GREENLEAF FUNCTIONS GENERAL | 
| LIBRARY has over 200 functions in C and assembler. | 
Strength in DOS, video, string, printer, async, and systems 
interface. All DOS 1 and 2 functions are in assembler for speed. 
All video capabilities of PC supported. All printer functions. 65 : 
string functions. Extensive time and date. Directory searches. f Polled | 
mode async. (If you want interrupt driven, ask us about the Green- 
leaf Comm Library.) Function key support. Diagnostics. Rainbow 
Color Text series. Much, much more. The Greenleaf Functions. Simply 
land the most extensive). All ready for you. 


THE GREENLEAF FUNCTIONS” 


The Library of C Functions that probably has just what you need . .. 
« already has what you're working to re-invent 
a already has over 200 functions for the IBM PC, XT, AT, and compatibles 

tested . 

« already has demo programs and Saree 

» already compatible with all popular compilers 

s already supports all memory models, DOS 1.1, 2.0, 2.1 LPG S. 
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» already in use by thousands of customers worldwide 
e already available from stock (your dealer probably has it) 
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The Library of C Functions is Waiting for You 
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» General Libraries $185 





» Comm Library $185 
no 56 VDITE 7 
» Lattice C $395 
« Mark Williams $475 


Circle no. 97 on reader service card. 


Specify compiler when ordering. Add $7.00 for UPS second- 
a air (or $5.00 for ground ). Texas residents add sales tax. 
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For Information: 214-446-8641 


Prices are subject to 
change without notice. 
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2101 HICKORY DR. | 
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FORUM 


PROFESSIONAL PROGRAMMER 


Kitchen-Table 
Entrepreneur 


The purpose of this depart- 
ment is to provide infor- 
mation of use to profes- 
sional programmers. This 
first installment addresses 
itself to the independent 
software developer, ro- 
mantically and perhaps 
not altogether inaccurately 
envisioned as working on a 
VAX by day and by night 
designing the compiler of 
tomorrow on an XT on the 
kitchen table. We point 
here to a number of books 
that might be of use to the 
kitchen-table entrepre- 
neur. 


Copyright 

Read books on copyright 
with some caution. Both 
copyright law itself and 
the interpretations of it in 
court have changed in 
their application to soft- 
ware publishing. Don't as- 
sume that you need not 
copyright your software if 
you favor a Freeware/ 
Shareware approach to 
distribution. 


Remer, Daniel. Legal Care 
for Your Software. Berke- 
ley, Calif.: Nolo Press, 1984. 
Read this for discussion 
of all the legal issues: work- 
for-hire agreements, non- 
disclosure agreements, 
contracts, license agree- 
ments. The author covers 
the differences among and 
nuances of copyright, 
trade-secret protection, 
patent, and trademark reg- 
istration. The book ex- 
plains your legal liabilities 
and how international 
copyright works. It has a 
number of sample forms, 
such as a beta test site 
agreement form. 
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Salone, M.J. How to Copy- 
right Software. Berkeley, 
Calif.: Nolo Press, 1984. 

Read it for deeper dis- 
cussion of copyright issues. 
What happens when the 
first 500 disks go out with 
no copyright notice on the 
disk or in the code? What 
can you do if your copy- 
right is infringed? Hun- 
dreds of examples are 
provided. 


Documentation 

Read something on docu- 
mentation and realize how 
important it is. A good 
manual is, after all, the best 
copy protection available. 
Many programmers cut 
their own throats by re- 
leasing good software with 
illiterate, poorly designed 
documentation. Besides 
creating an aura of ama- 
teurishness for your prod- 
uct, such a manual will 
hide the capabilities of 
your product from users— 
and however experienced 
a programmer you may 
be, the odds are youre an 
amateur in producing 
documentation. 


Houghton-Alico, Doann. 
Creating Computer Soft- 
ware User Guides. New 
York: McGraw-Hill, 1985. 

Read it to jog your mem- 
ory about some of the tech- 
niques available for com- 
municating about your 
software—maybe what 
your compiler documenta- 
tion needs is a good pie 
chart. Maybe not. Use the 
book to get an idea of what 
professional documenta- 
tion writers have to do, 
though their tasks are 
somewhat different from 
yours, of course. 


Stephan, Peter M. Writing 
User-usable Manuals. Salt 
Lake City: Wredco Press, 


1984. 

Read it as an example of 
decent low-cost documen- 
tation. The author has won 
awards for his documenta- 
tion, and although the 
book may not tell you any- 
thing you don’t already 
know, it shows that a man- 
ual need not be typeset and 
perfect bound. 


Strunk, William, and 
White, E.B., The Elements 
of Style. New York: Mac- 
millan, 1972. 

Read it. Whether you 
write the documentation 
or hire writers, your 
words are likely to see 
print somewhere. There is 
no more concise guide to 
keeping your foot out of 
your semiliterate mouth 
than this book. 


Markets 

Read these if you're really 
an independent software 
developer and don't want 
to distribute your prod- 
uct(s) yourself. These books 
mainly list software 
distributors. 


Amato, Francis. Guide to 
Computer Magazines. Dal- 
las: Steve Davis, 1985. 

Read it for a quick idea 
of the editorial focus, cir- 
culation, and audience of 
selected computer maga- 
zines. This can be useful 
for promotional and ad- 
vertising purposes, and 
some of the magazines are 
software markets in them- 
selves, publishing pro- 
grams in their pages and/ 
or on disks. 


Hoffman, Roger. The Com- 
plete Software Market- 
place. New York: Warner 
Books, 1984. 

Read it for many reasons. 
One reason is to get an 
overview of the things you 


need to know in running a 
small software business. 
The book.has lists of distrib- 
utors, including mail-order 
companies, electronic dis- 
tributors, and magazines. 
There are also lists of disk 
duplication services, PR 
firms, market research 
firms, trade associations 
and shows, seminars, and 
conferences. There are 
case studies and a useful 
section on freebies for the 
independent author. 


McGehee, Brad M.., ed. 1986 
Programmer's Market. Cin- 
cinnati: Writer's Digest 
Books, 1985. 

Read it for publishers 
who use ‘free-lance’ mate- 
rial—even the terminology 
reflects this book’s heri- 
tage. It was put together by 
people who view the inde- 
pendent software develop- 
er as another kind of au- 
thor. If that description fits 
you, this book may also. 


Software Design 

Read this to remind your- 
self of the basic principles 
and also to learn a vocabu- 
lary for communicating 
the principles to others. 


General Electric. Software 
Engineering Handbook. 
New York: McGraw-Hill, 
1986. 

Read it for one approach 
to the management of large 
software projects when 
your design team actually 
becomes a team. Also read 
its bibliography for sources 
on design methods: Nassi/ 
Sneiderman, Warnier, 
Yourdon, and Jackson 
methodologies; data-flow 
driven design. 


DDJ 
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BOOKSHELF” 


Fast, compact, high quality, Yorios 700 
easy-to-use CP/M system 





Presenting SMK, the 
SEIDL MAKE UTILITY™ 


SMK is a UNIX like make utility for MS-DOS, but without the 






Priced from 












| ___ $895.00 __ cryptic commands or limitations. When changes are made to any 
10MB System program module, SMK will issue only those commands necessary 
Only $1645.00 and sufficient to rebuild the system. SMK is a professional, full- 






featured make utility. 







Advanced SMK features include: 


@ Super fast analysis of dependency files. Proprietary depen- 
dency algorithm analyzes all dependencies before rebuilding 
any files. 






@ SMK understands complicated dependencies involving nested 
include files, source and object code libraries. 





@ High-level dependency definition language makes setting up 







Features dependencies easy. Supports parameterized macros, local 
@ Ready-to-use professional CP/M @ Comprehensive Software Included: : . ; 

Laphbuseetysten © EnhencediCP/M Operating stem variables, constants, include files, command line parameters, 
@ Works with any RS232C ASCII terminal with ZCPR3 in-line and block comments. 

(not included) @ Word processing, spreadsheet, 


@ Works on any MS-DOS (PC-DOS) computer and with most 
compilers, assemblers and linkers. 


relational database, spelling checker, 
and data encrypt/decrypt 





@ Network available 








@ Compact 7.3 x 6.5 x 10.5 inches, (T/MAKER III) 
12.5 pounds, all-metal construction © Operator-friendly shells; Menu, @ Full pathname and directory support. 
@ Powerful and Versatile: Friendly™ e : \ 2 
@ Based on Little Board/PLUS single- @ Read/write and format dozens of Typeset user’s manual and excellent error diagnostics make 
board computer floppy formats (IBM PC-DOS, KAYPRO, SMK easy to learn and us 
@ Two RS232 serial ports OSBORNE, MORROW ... ) y - 
® One Centronics printer port @ Menu-based system customization ° 
®@ One or two 400 or 800 KB floppy @ Expandable: Price: $99.95 
drives 






(add $3.50 postage & handling) 


SEIDL COMPUTER ENGINEERING 
1163 E. Ogden Ave., Suite 705-171 
Naperville, IL 60540 
(312) 983-5477 


(SMK, UNIX, MS-DOS, PC-DOS are all trademarks. ) 


@ Floppy expansion to four drives 
® Hard disk expansion to 60 megabytes 


@ SCSI/PLUS™ multi-master |/O 
expansion bus 


@ 10-MB internal hard disk drive option 









T/MAKER lil is a trademark of T/Maker Company 


IBM 1s a registered trademark of International Business Machines 
Z80A is a registered trademark of Zilog, inc 
CP/M is a registered trademark of Digital Research 
COMPUTERS. INCORPORATED 
67 East Evelyn Ave. e Mountain View, CA94041 « (415) 962-0230 « TELEX 4940302 





Circle no. 158 on reader service card. Circle no. 114 on reader service card. 
™ ™ 
NEON: TURN ON THE FULL POWER OF YOUR MACINTOSH 
@ GS 


Hidden within your Mac is the programming power, flexibility, 





and speed to match your imagination. Neon is your key to this 
object-oriented world. Based on the same design philosophy as 
the Mac itself, Neon lets you create and command objects — 
program modules that you build, perfect, and add to your 
personal collection of tools. In this Smalltalk-like environment, 
you wield the power to quickly assemble and test ideas, tuning 
as you go for maximum speed and efficiency. 1 Neon works in 


128K or dynamically expands for the fattest Mac possible. It is 
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easy to work with from the very beginning. Additional help 


is provided through the comprehensive manual by Danny 





Goodman. LJ Created by Kriya Systems, Inc. for the develop- 
ment of our Typing Tutor III™ program, Neon is your answer for 
professional software development. With Neon, there are no 
licensing fees. Ever. For the MacIntosh developer, Neon is the 


best choice. 








To order your copy of Neon, call 1-800-34KRIYA now with Visa or MasterCard, or send your check to Kriya 
systems, Inc., Six.Export Drive, Sterling, VA 22170. The price is $155, including shipping and handling. 


Neon and Typing Tutor III are trademarks of Kriya Systems, Inc. Apple Macintosh is a trademark of Apple Computers, Inc. 


Circle no. 100 on reader service card. 
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Peak Electronics has an- 
nounced a 68K coproces- 
sor board that, it claims, 
you can plug into any 
(IEEE-696-1983) S-100 system 
running CP/M-2.2 and have 
CP/M-68K running in min- 
utes with no hardware or 
software modifications. 
The 68K8-CP is a 10-MHz 
processor card with an 
MC68008 (8-bit version of 
the 68000), up to 512K RAM, 
up to 128K EPROM, two 38.4 
kilobaud serial ports, and 
an 8-bit parallel printer 
port. The 68K8-CP doesn't 
replace your current CPU 
card but runs in conjunc- 
tion with it, so you can 
jump back and forth be- 
tween operating systems. 
Peak says that the board 
will support Concurrent 
DOS 68K when it’s released. 
Speaking of Concurrent 
DOS 68K, maybe DRI is final- 
ly going to exploit the head 
start it had in 68K develop- 
ment software: The com- 
pany was expected to in- 
troduce its 68K developer's 
kit at Comdex in Novem- 
ber. With Concurrent, DRI 
has two operating systems 
for the 68000; three if you 
count the GEM windowing 
environment. Concurrent 
DOS 68K has a CP/M front 
end that will run most CP/ 
M-68K programs, and DRI is 
promising GEM support for 
subsequent versions of 
Concurrent DOS 68K. 
Speaking of GEM, last 
month we discussed it and 
other windowing environ- 
ments and, because of 
space limitations, men- 
tioned only some of the 
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most visible. We don’t feel 
right about giving all that 
attention to the big boys 
and never mentioning two 
windowing products we 
have had good experience 
with: Desqview and dWin- 
dow. It was, of course, not 
only Digital Research, IBM, 
and Microsoft that went 
windowing. Quarter- 
deck’s Desqview is an im- 
pressive competitor to 
TopView, which bundled 
with AST’s Rampage ex- 
panded memory board, 
lets users run up to nine 
programs concurrently in 
memory. Also, the success 
of the concept of windows 
is exemplified by its em- 
ployment in a nonoperat- 
ing system application in 
the product dWindow. For 
years, Ashton-Tate’s dBASE 
II set the standard for aus- 
terity in user interfaces: 
You can’t get much sim- 
pler than a single-period 
prompt. Liberty Bell Pub- 
lishing’s dWindow does a 
dazzling cathedral win- 
dow treatment on dBase II 
(and now dBase III) that 
makes it look like an en- 
tirely different product. 

Speaking of entirely dif- 
ferent products, Answer 
Software has announced 
an 80286 emulator for de- 
velopers of 80286-based 
software. The ICD286 con- 
sists of a card for the host 
system (which must be in 
the IBM PC/XT/AT family or 
a compatible), a Buffer Box 
that plugs into the 80286 
slot in the target system, 
and a symbolic debugger. 
It allows uploading and 
downloading of code and 
data, hardware and soft- 
ware breakpoints, single- 
stepping, and full-speed 
emulation up to 10-MHz 
clock rates. 

And speaking of 80286 
development, American 


ADO has introduced an 
80286 board for Multibus 
systems. The SOL C286-01 
(no relation to the Proces- 
sor Technology Sol com- 
puter of story and song) is 
being manufactured in 6-, 
8-, and 10-MHz versions 
and has up to 512K RAM, a 
Centronics printer inter- 
face, and two 8- or 16-bit 
SBX bus I/O connectors. 
Then there’s the ET- 
286Plus, a 10-MHz AT-com- 
patible single-board com- 
puter that uses the new 
1-Mb dynamic RAMs and 
allows 4 megabytes on- 
board. ATS International 
was expected to show it at 
Comdex. 

As long as we're speak- 
ing of the 286 and operat- 
ing systems, we should 
mention Locus Comput- 
ing’s Multisystem Merge. 
This product allows simul- 
taneous, transparent exe- 
cution of Unix and MSs DOS 
on the same machine ac- 
cording to the company. 
You can set several Unix 
tasks to work in the back- 
ground while you run a 
DOS application in the fore- 
ground. This is the system 
AT&T is using on its 6300+ 
Unix/DOS computer. Locus 
developed some of the 
technology in the system 
while writing PC-Inter- 
face, a product that links 
DOS computers to a host 
Unix machine. 

DRI, which we were 
speaking of a few para- 
graphs back, is of course 
not the only developer of 
operating system software 
for the 68K, as two recent 
announcements prove. US 
Software has announced a 
real-time multitasking sys- 
tem for embedded appli- 
cations using the 68K. It’s 
ROMable, requires 3K of 
code space, and is called 
USX68K. Integrated Busi- 


ness Computers has ported 
TheOS-16 (formerly Oasis) 
to its line of 68010 comput- 
ers and was expected to be 
showing a beta version at 
Comdex. 

Speaking of beta-test 
versions, Tall Tree Systems 
has begun shipping beta 
versions of its Jlaser- 
printer interface to soft- 
ware companies it deems, 
closest to achieving com- 
patible products. The in- 
terface is a PC/XT/AT card 
that works with the JRAM 
2-megabyte memory 
board; it’s designed to 
spend memory to buy 
print speed and typeface 
flexibility for laser print- 
ers. It transfers bit- 
mapped images directly 
from RAM to the print 
mechanism and is sup- 
posed to provide unlimit- 
ed type fonts with full 
graphics capabilities at 300 
dots per inch in eight 
seconds. 

Speaking of mucho me- 
gabytes, Reference Tech- 
nology has announced a 
device that lets you attach 
up to eight of its optical 
disk drives, for more than 
4 gigabytes of storage on a 
(sturdy, large) desktop. 
The device is PC/XT/AT or 
compatible compatible. 

Speaking of product an- 
nouncements, Speech 
Technology is now selling 
the cross-assemblers it de- 
veloped in the process of 
designing and manufac- 
turing electronic devices 
to aid the blind (its real 
business). The MS DOS 
cross-assemblers for the 
8048 and 6502 were writ- 
ten in C and support a sub- 
set of C preprocessor com- 
mands, macros, three 
object file formats, and 
features to support PROM 
programming. They sell 
for $30 each or $75 for 
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both with source code and 
are distributed with no re- 
striction on noncommer- 
cial copying. 

Speaking of copying, we 
are watching with interest 
SoftKlone’s fortunes with 
a product it cheerfully de- 
scribes as a clone of Mi- 
crostuf’s Crosstalk XVI 
data-communications 
package. SoftKlone’s Mir- 
ror was designed to the 
precise visual specs of 
Crosstalk, and SoftKlone 
presents itself as introduc- 
ing a new idea—mirror- 
image software at a lower 
price than the mirrored 
product and perhaps with 
added capabilities. Rather 
than competing by pro- 
ducing a better or cheaper 
product, the notion here is 
to produce the same prod- 
uct better or cheaper. 





Reference Map 

Peak Electronics, P.O. Box 
700112, San Jose, CA 95170; 
(408) 253-5108. Reader Ser- 


vice Number 16. 
_ Digital Research, P.O. Box 


DRI, Monterey, CA 93942; 
(408) 649-3896. Reader Ser- 
vice Number 17. 

Liberty Bell Publishing, 
618 N.W. Glisan, Ste. 203, 
Portland, OR 97209; (503) 
221-1806. Reader Service 
Number 18. 

Quarterdeck Office Sys- 
tems, 1918 Main St., Ste. 
240, Santa Monica, CA 
90405; (213) 392-9851. Read- 
er Service Number 19. 
Answer Software, 20863 
Stevens Creek Blvd., Cu- 
pertino, CA 95014; (408) 
253-7515. Reader Service 
Number 20. 

American ADO, 1840 West 
186th St., Ste. 200, Tor- 











rance, CA 90504; (213) 532- 
5010. Reader Service Num- 
ber 21. 

ATS International, 2105 
Luna Rd., Ste. 330, Carroll- 
ton, TX 75006; (214) 247- 
5151. Reader Service Num- 
ber 22. 

Locus Computing Corp., 
3330 Ocean Park Blvd., 
Santa Monica, CA 90405; 
(213) 452-2435. Reader Ser- 
vice Number 23. 

US Software, 5470 N.W. In- 
nisbrook PIl., Portland, OR 
97229; (503) 645-5043. Read- 
er Service Number 24. 
Integrated Business Com- 
puters, 21621 Nordhoff St., 
Chatsworth, CA 91311; 
(818) 882-9007. Reader Ser- 
vice Number 25. 

Tall Tree Systems, 1120 
San Antonio Rd., Palo Alto, 
CA 94303; (415) 964-1980. 
Reader Service Number 26. 





Reference Technology, 
1832 North 55th St., Boui- 
der, CO 80301; (303) 449- 
4157. Reader Service Num- 
ber 27. 

Speech Technology Inc., 
16321 176th Ave. N.E., 
Woodinville, WA 98072; 
(206) 483-5150. Reader Ser- 
vice Number 28. 

SoftKlone, 1210 East Park 
Ave., Tallahassee, FL 
32301; (904) 878-8564. Read- 
er Service Number 29. 
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THE HAMMER 


Software Tools in C 





COHERENT 


forthe AT 


A fast UNIX-compatible O/S for networking, 
communications and process control 


> Total object code compatibility 
between the IBM AT, XT and PC. 

> Optional support available for 
front-end communications 
processor functions, high resolu- 
tion graphics, image capture, 
mouse and other hardware. 
Flexible turnkey and runtime 

> licensing available. 
Professional technical support 
provided. 






“| have already saved weeks of coding... . thank you for providing 
such a useful too! .. ." - GT. 


Let The HAMMER Library of over 150 routines save you valuable 
development time and effort: 


LIBRARY FUNCTIONS 
e Multi-level 123-like MENUS 
e DATA ENTRY 
e MULTI-FIELD mode for Full-Screen data entry 
e Single-Field mode for individual fields 
e Data Verification 
e Full Editing within each field 
e Strings. dates, and fixed decimal numbers 
e “Option” fields force user to pick from a given set 
e SCREEN MANAGEMENT 
e cursor positioning 
e full attribute control 
e Date/time/string conversions 
¢ BIOS access/pattern matching/and more 


UTILIHIES 
e HARC- -complete Source File Archiver 
¢ HAMCC -compile designated source modules residing 
WITHIN an archive file under any of the supported 
compilers and optionally place resulting object 
modules in a library. 


SUPPORTED C COMPILERS: 
Microsoft C 3.00 e Cl-C86 e Mark Williams C86 
DeSmet C ®@ Lattice 


INCLUDES source code and manual! 














> Comes with unique disk partioning 
capability that allows storage of 
DOS or other O/S on same disk as 
COHERENT. 
Special kernel enhancements make 
it easy to configure COHERENT to 
individual system requirements. 

> Includes complete COHERENT 

development environment with C 

compiler, screen editor and source 

code control system. 

Available with UNIX System V 

compatible support for inter- > 

process communications. 


To discuss your system requirements cali: (604) 294-6201 


2457 Beta Ave., Burnaby, B.C., Canada V5C 5N1 


COHERENT is a trademark of Mark Williams Co. UNIX is a trademark of Bell Laboratories. IBM AT, XT and 
PC are trademarks of International Business Machines Corp. 


e display boxes & tables 
e scrolling and clearing 
















$195 plus shipping 
VISA/MC accepted 






0.E.S. SYSTEMS 
1906 Brushcliff Rd. e Pittsburgh, PA 15221 e 412/243-7365 


Looking for the right tool for the job? 
REACH FOR THE HAMMER 


Circle no. 137 on reader service card. 







Circle no. 166 on reader service card. 
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ADVERTISER INDEX 






Rowing op? 
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C expressions. 


e Many more features including batch mode 
and 8087 support. 
© Price: $300.00 (Demo $45.00) MC, VISA 


Price of demo includes documentation & shipping within 
U.S. PA residents add 6% sales tax. Specify compiler. 


® C+terp runs on the IBM PC (or compatible) under DOS 2.x 
with a suggested minimum of 256Kb of memory. 
It can use all the memory available. 


CIMPEL SOFTWARE 


3207 Hogarth Lane ® Collegeville, PA 19426 
(215) 584-4261 
* Trademarks: C86 (Computer Innovations), Lattice 


(Lattice Inc.) IBM (IBM Corp.), C-terp (Gimpel Software), 
Microsoft (Microsoft), Aztec (Manx) 
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* This advertiser prefers to be contacted directly: see ad for phone number. 





Advertising Sales Offices 


East Coast 
Walter Andrzejewski (617) 567-8361 


Midwest 
Michele Beaty (317) 875-8093 


Northern California/Northwest 
Lisa Boudreau (415) 424-0600 


Southern California/AZ/NM 
Beth Dudas (714) 643-9439 


Advertising Director 
Shawn Horst (415) 424-0600 


Dr. Dobb’s Journal, January 1986 


Reader Reader 
hols Service Page Service Page 
G oe waiting No. Advertiser No. No. Advertiser No. 
158 AMPROCOMpUCISING ............ 125 110 MicrointerfacesCorp............. 43 
for C programs to 176 Advent Protics NG... 64-65 136 Microcomputer eis Consultants 42 
| | 221 Alcyon Corp... | 52 * Microniniine ...... =.=. 84 
com pl | e and lin k ‘ 121 AvilyCorporaiign...-«=—«si«‘(‘iéé«éC«é#CR;(C#;C;:C;: 117. 105 MicroProcessors Unlimited ........ 101 
224 AltariCorporaion......._......--. C-3 * Microtec Research .............-= 113 
216 ANOD. ................ 2-22. 24 190 Mieke 97 
159 BlaiseCompuiine  §...-.........-. 4 * Mis Soliware 59 
161 Borland interogiional ............. C-4 128 Morgan Computing Company ...... as 
126 Boston Software Works............ 101 79 Mystic Canyon Software ........... 119 
18) CUsersGroup. ....... 86 147 OFS Sysleins... .. =... 127 
209 Certified Software Corp. ........... OS, 6124 Oploiech =. -—s.... a 1 
178 Chalcoiony.=.—si‘(‘(‘é#RSC¥R:CO##C(C#;C# Si 192 Overland Dalaine............... 50 
Al (pgiiaielit 98 200 PecanSofiwareSysiems ..........- 13 
122 Compuview...... «is... es 39 76 Persondiilexinc ................: 50 
225 Computel Publishing Society ....... 116 139 Phoenix Computer Products ....... 46 
96 Computerinnovations ............ 72 91 Phoenix Computer Products ....... 5 
82 Creative Programming .......--.. 5B 193 Pi Perfect Sysieuis ..............:. 24 
Se DalsoitSysiciis..........--.-.:-- 94 169 Poor PersonSoftware ...........-. 105 
130 Data Base Decisions.........-..-.-.-- 88 " Precise Electronic .-..........-... 111 
203 Dalat. .  .....---.-.--- OF 201 Preniiceliaiive ... 2... «2.2; 98 
87 Digital Research Computers ........ 53... «196 Pro/Ani Sofiware. 54 
Use C: sae ter PO4 Diseicne 6° ee $3. 140 Productivity Productsint!,......... 73 
7 179 Earth Compilers ............_.-.- SG 143 ProgrammersShop.............-. 35 
the complete G interpreter eo Foose ti S| (41 ProgianimersShop.....-«....- 63 
as te ; 210 Educational Microcomputer Systems 28 205 Quelo...........-......+++:+.-::- 94 
This is the product youve been OO Edward Beam ........... «ss: S70 6107 OuiliConiulng.....-... 101 
waiting (and waiting) for! 138 EssentiaiSofiware..............-. 77 «6206 RaimatGr..t«*si‘C (‘RNR 19 
Increase your productivity and avoid 165 Everest Solutions.............--.-. C2 145 Rational Systemsinc .............. 92 
._ . ; 7, 150 Executive Svciems is 17. 170 Relational Database Systems........ 82 
agonizing waits. Get instant feedback of 
your C programs for debugging and rapid 21 OG 7s 215 Gh&Mictos. tis 111 
prototyping Then use your compiler for OS Fara 2.) 8. 56 78 SLR SYSICHNIS —..... rte 52 
wht if does best...compiling efficient code G4 FoxSottwarcii. ....._-....-.-- 22 i114 Seidl Computer Engineering ....... 125 
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Apple Mac 512” 














Go ahead. Compare those other 
machines with the new Atari 520ST"™ 
They cost hundreds of dollars more, but 
you don’t get much in return. That's 
what we call a rip-off. 

For $799.95* the 520ST comes com- 
plete with high-resolution monochrome 







ATARI™ IBM™ APPLE™ | COMMODORE™ 
520ST PCAT™ — |Macintosh™ AMIGA™ 
Price $799 $4675 $2795 $1795 
CPU 68000 80286 68000 68000 
Speed MHz 8.0 6.0 783 716 
Standard RAM 512K 256K 512K 256K 
Number of Keys 95 89 
Mouse Yes No Yes 
Screen Resolution 
(Non-Interlaced Mode) 
Color 640 x 200} 640 x 200 None 640 x 200*** 
Monochrome 640 x 400] 720 x 350** | 512 x 342 | 640 x 200*** 
Color Output Yes Yes 
Number ofColors 512 4096 
Disk Drive a5” 38” 
Built-in Hard Disk 
(DMA) Port Yes Yes iN) No 
MIDI Interface Yes No No 
No.ofSound Voices 3 4 


**With optional monochrome board (non bit-mapped) 
***Interlace Mode — 640 x 400 


Circle no. 224 on reader service card. 
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IBM PCAT™ 


FOR THESE PRICES: 





Introducing the Mar SOOST porsonal computer satan. 8703 


monitor, 2-button mouse, 3.5” disk 
drive, TOS™ Operating System, including 
GEM™ Desktop, plus Logo™ and Atari 
BASIC programming languages. $200 
more gives you an RGB color monitor 
with 512 glowing colors. 

Choose innovative business, enter- 
tainment, education, systems manage- 
ment, and integrated package software. 
Expand your 520ST with industry 
standard parallel printers, modems, 
MIDI controlled synthesizers and key- 

























Commodore Amiga™ 


RE’S ONLY ONE WORD 









95* complete. 
boards, 1 
megabyte 
floppies, 10 
MB and 
larger hard 
disks, and 
more. All 
available 
now. At re- 
markably low prices. 

So, go ahead. Compare the ST system 
to those other guys. Only Atari gives 
you so much. For so little. 

For the dealer nearest you, write Atari 


Corp. Customer Services, 1196 Borregas 
Ave.,, Sunnyvale, CA 94086. 





*Plus applicable local taxes. $999.95 with color monitor. 
All prices are manufacturer's suggested retail list. 


JK ATARI 
Power without the price. 


IBM &PCAT are registered trademarks of Inter- 
national Business Machines Corp. Commodore 
& Amiga are trademarks of Commodore Elec- 
tronics LTD. Apple & Macintosh are 
trademarks of Apple Computer, Inc. 
GEM is atrademark of Digital Re- 
search. Inc. Atari, TOS & Logo are 
trademarks of Atari Corp. 


SAVE OVER 30% ON OUR GIFT PACKS! 


60-DAY MONEY-BACK GUARANTEE 





How Borland’s Three New Holiday 
Packs Will Fill Your Stocking Without 
Emptying Your Piggybank. 


Three special packs with dazzling discounts that will help get 
you into a Holiday mood. You can get some of Turbo, most of 
Turbo, or all of Turbo— including the two newest 
members of the Turbo family, Turbo GameWorks™ and 4 
Turbo Editor Toolbox™ You also get our unmatched 60- * aS aul 
day money-back guarantee, quality products _ 
that aren't copy-protected. 


You get the two exciting new members of the 

Turbo Pascal family, 

@ TURBO GAMEWORKS, Chess, Bridge, and Go- 
Moku, complete with source code and a 200- 
page manual. . 

© TURBO EDITOR TOOLBOX, all the building J § & 
blocks to make your own editors and word § 
processors, complete with source code and a 
200-page manual. 


You get all three of the Turbo family classics 

for only $125.00 (about a 30% discount). Turbo 

Pascal 3.0 and Turbo Tutor and Turbo Data- 

Base Toolbox—all for just $125.00. 

@ TURBO PASCAL combines the fastest Pascal 
compiler with an integrated develop- 
ment environment 

-@ TURBO TUTOR teaches you step-by-step _ 6 
how to use Turbo Pascal with commented ee | 
source code for all program examples on diskette. = 
@ TURBO DATABASE TOOLBOX offers three problem- 
a - modules io your Tuto os Turbo 
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Our new Turbo GameWorks offers games you can play and replay 


without Turbo Pascal or revise and rewrite with Turbo 
Pascal 3.0. We give you the source code, the 
manual, the diskettes and the competi- 
tive edge. Chess, Bridge and Go-Moku. 
State-of-the-art games that let you be play- 
er, referee, and rules committee all at once 
because you have the Turbo Pascal source 
code. Learn exactly how the games are 
made—so you can go off and make your 
own. And Turbo GameWorks is the only quality 
game you can buy that is not copy-protected. 
Sold separately, only $69.95. (Just $47.50 if you 
buy the Turbo New Pack. ) 


Build your own word processor—for only $69.95! 
You get ready-to-compile source code, a full- 
featured word processor that looks and acts like 
WordStar™ and a 200-page manual that tells you 
how to integrate the editor procedures and functions 
into your programs. With Turbo Editor Toolbox you 
can have the best of all word processors. You can make 
WordStar behave like Multi-Mate. Support windows 
just like Microsoft's Word. And do it as fast as 
WordPerfect does it. Incorporate your new 
“hybrids”’ into your programs to achieve incredible 
control and power. Sold separately, only $69.95. 
(If you buy the Turbo New Pack, the price ~ to 
just $47.50. i 
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